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ABSTRACT 


The dissertation presents a method of analysis to predict the 
complete load-displacement response for large multi-story steel frames , 
with provision for diagonal bracing members and shear wall elements. 

The member response is assumed to be elastic-perfectly plastic. The 
influence of axial load on the stiffness and carry-over factors is 
considered for the columns, but neglected for the girders. The effects 
of finite column width and girder hinge reversal on the behavior is 

also considered. Diagonal bracing members are assumed to be Subjected 
to axial loads only. The frame analysis is second order, that is to 
Say, the story shear equilibrium is formulated On the deformed structure. 
Axial shortening of the columns is considered. The equilibrium ecuations 
are solved by a modified Gauss elimination procedure. A number of 
comparative studies are described, which are used to verify the method 
of analysis. 

An extensive behavioral Study is performed on a number of 
frames subjected to vertical loads alone, and to combined vertical and 
lateral loads. Comparisons are made between the behavior of unbraced 
and braced frames, with particular empnasis on the P-a effects. Coupled 
unbraced-supported and braced-supported frames are also considered. A 
design procedure, based on the results of the behavioral studies, is 
reconmended for multi-story structures. The method results in a more 
uniform factor of safety than does present design practice. 
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CHAPTER I 
INTRODUCTION 


In recent years the number of tall commercial and residential 
buildings has increased rapidly. As buildings increase in height the 
need to ensure adequate lateral stiffness and Strength becomes more 
acute. The structure must provide the strength to resist combined 
lateral and vertical loads, and must provide adequate stiffness to 
prevent frame buckling under vertical loads alone. In addition the 
Structure must have the stiffness to limit sway deflections (at working 
load) to a reasonable amount. 

The resistance of multi-story framed structures to lateral 
sway is developed through the flexural resistance of the beams, columns 
and shear walls in the structure, and the extensional stiffness and 
strength provided by the bracing members. The architectural require- 
ments of modern buildings often relegate major bracing elements to 
selected bents and core areas. Thus different member arrangements occur 
in the frames of a given structure. These frames are normally classi- 
fied with respect to their contribution to the overall lateral stiffness 
of the building. An "unbraced" frame, such as that illustrated in 
FIGURE 1.1a, develops its lateral stiffness solely through the flexural 
resistance of its columns and girders. The "braced" frame, shown in 
FIGURE 1.1b, derives its lateral rigidity primarily from an added 


bracing system consisting of diagonal bracing members, K-bracing members 
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or shear walls. A "supported" bent depends on adjacent braced or 
unbraced bents for resistance to lateral forces. A supported bent is 
illustrated in FIGURE 1.1c, coupled with a braced bent. 

The columns in a multi-story frame are designed to support 
the loads from the adjacent girders and the column above, and in many 
cases to provide lateral stiffness for the frame. Columns may be 
subjected either to axial forces or to axial forces in combination with 
bending moments (beam-columns). Beam-columns are commonly designed on 
the basis of interaction equations, based on the ultimate Strength of 
the member. Moments and axial forces from a first order analysis are 
used in these empirical equations to guard against local overstressing 
and overall instability. These equations compute the ratios of actual 
axial stress to allowable axial stress, and actual bending stress to 
allowable bending stress, and limit the combined quantities to provide 
acceptable factors of safety. The local strength equation is inde- 
pendent on the effective length (or buckling load) of the member. The 
effective length enters into the computation of allowable aXtal ‘stress, 
and the amplification and equivalent moment factors. All columns must 
be checked for both local overstressing and overall stability. 

A knowledge of the effective length of an individual member 
is necessary only because of the way in which the empirical estimate 
of the ultimate strength is formulated. To determine the effective 
length factor for a column, the usual procedure is to first classify 
the column as either "prevented from sway" or "permitted to sway," then 


to solve the appropriate differential equation, entering with ratios of 
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the column to girder stiffnesses at either end of the column, thus 
obtaining the critical load, and so select the effective length. 

The behavior of columns prevented from Sway, aS shown in 
FIGURE 1.2a, and those permitted to sway, shown in FIGURE eA era BS 
significantly different because of the presence of secondary moments 
induced by the story sway deflections. The moment at a distance x 


from the upper end of either column is given by: 


Z exp = 
M = My h (M + M) Ps (Te) 


where M, = moment at the upper end of the column 

Me = moment at the lower end of the column 

h = column height 

P = column axial force 

6 = deflection of the column measured from the chord 
For the column prevented from sway, the sum of the end moments, Mi + 
Ms is: 

M + Me = Vh (ie2) 

For the column permitted to sway, the end moments are increased due to 
the column axial load acting through the relative story sway displace- 
ments: 


we, ah oop veal (ies) 


L 
where A = sway deflection of the column. 


This additional] moment, known as the P-A moment, is 
assumed to be accounted for by using the effective length factor for a 
column permitted to sway, and is neglected when the effective Jength 


factor for a column prevented from sway is used. 
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Common design practice is to consider the columns in unbraced 
bents as permitted to sway, and those in braced or Supported bents as 
prevented from sway. This implies that columns in a braced or supported 
bent are free from significant increases in moment due to Sway 
deflection. 

[It is the purpose of this dissertation to Study the effect of 
various lateral bracing systems on the behavior of planar steel frames 
subjected to vertical loads, and to combined vertical and lateral loads. 
A comparison of the behavior of braced and unbraced frames designed 
under similar conditions is made. Of particular interest is the addi- 
tional lateral stiffness required to remove secondary P-A moments from 
frames whose columns are designed assuming Sidesway is prevented. The 
behavior of supported bents is also investigated. 

Extensive research has been performed to study the behavior 
of multi-story planar frames. A brief review of the methods of analysis 
of multi-story frames, which are able to trace the behavior of tall 
structures up to their ultimate loads, is presented in CHAPTER 2. The 
features of particular significance to this dissertation will be dis- 
cussed in detail. The experimental work, pertinent to the design of 
multi-story frames will also be reviewed. 

The next portion of the dissertation is concerned with the 
development of a computer program capable of analyzing large planar 
frames, containing bracing and shear wall elements. The responses of 
the columns, girders and diagonal bracing members are described in 


CHAPTER 3. The standard slope-deflection equations, modified for 
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plastic hinging, are used to describe the behavior of columns and girders. 
The influence of axial load on the stiffness and carry-over factors is 
considered for the columns, but neglected for the girders. The effects 
of finite column width and hinge reversal on the behavior of the girders 
are also considered. A method is presented to describe the behavior of 
diagonal bracing members subjected to tensile or compressive loads. 

The frame analysis program is outlined in CHAPTER 4. Equili- 
brium equations are formulated for moment and vertical forces at each 
joint, using the member slope-deflection equations. A story shear 
equilibrium equation is formulated on the deformed structure at each 
Floor level. The equilibrium equations are solved using a modified 
Gauss elimination procedure. 

Comparative studies of various frames subjected to combined 
vertical and lateral loads, and to vertical loads only are described 
in CHAPTER V. These studies are used to verify the present analysis. 

The second major part of the dissertation describes behavioral 
studies of planar frames containing various lateral bracing systems. 
Comparisons between the behavior of braced and unbraced frames are made 
in CHAPTER VI. A twenty-four story, plastically designed, three bay 
frame and a corresponding single story subassemblage frame are considered. 

The effect of coupling a supported frame with an unbraced and 
braced frame in turn is also investigated. The results of the 
benavioral studies are discussed in CHAPTER VII, and the proposed 
design method is presented. A summary of the investigation and the 


conclusions reached are presented in CHAPTER VIII. 
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CHAPTER II 
REVIEW OF PREVIOUS RESEARCH 


2.1 Introduction 

The review of previous research, presented in this chapter, is 
limited to those investigations directly concerned with the development 
of a procedure for the second order, elastic-plastic analysis of multi- 
Story structures. The work reyiewed in the following two sections deals 
with frames subjected to combined lateral and vertical loading, and 
frames subjected only to vertical loading, (frame buckling), respectively. 
Pertinent test results are discussed in each section. For a more com- 


plete survey, the reader is referred to References oo'4 fF andwoy 


2.2 Frames Subjected to Combined Vertical and Lateral Loads 

Using large computers the behavior of the multi-story structure 
can be traced throughout a given loading history. In a second order 
analysis, equilibrium is formulated on the deformed structure, thus 
taking into account the secondary (or P-A) moments induced by the 
gravity loads acting on the swayed structure. First order elastic, 
second order elastic, and second order elastic-plastic analyses of a 
portal frame subjected to constant vertical load and increasing hori- 
zontal load are compared in FIGURE 2.1. The horizontal load, Hes 45 
plotted as a function of the sway displacement, A. The "true" 


behavior, (experimental test curve), is also shown. The elastic and 












' =i 
J a 
Lou ‘wie pal] 

it 


ae x ap 
fm 4 i *: : ’ 6 iit = hs ot bog 

ie . 
i“ ; 7 . - - i 4 ry : ' i 4 Por ye “ 1 . i oegy { in 


i (7 oie 


brik i Destoeau | . | os bersakdie Samet 
’ 5 r riecety j , : c oy as wiris bake “page 


Se) . : +n CT 
% 


i Ne, i = dna tare : j + (it. ey vite 
3 


A 


a : is 
: os , , : alle 2 =” i 2 - 
so . , Tas i i< c ak 4 
= "y 23 “ D 





1“? I ait i } ( ) rig i - 1 weal), re venti rine 
Rel Pe) Bee ere Lp Te 4 ase Sheila ee vu 2 ‘ ep y* dott Py ; 
i = Jyh 














"O00 abryline sttvely:zijenio yd dreode bao Reale aes 
aa : ‘ ! v 7 -_ 4 [ = 
: . 


cold. toumly Taba 
« whe - oer) 


hile), 28 Qeuudd nt bers cash 


f : 7, 34 
en Whe’ Ga ee . ue : eu 
ee a é 7 - ’ oe 
‘eh 7 7 : - 

; 


4 iiiekion! beet (ne). tonliiiyctiehsug ot hei 
. a — ; ae . at : a ; 





inelastic frame buckling loads, and the simple plastic load, are indi- 
cated. The difference in slope of the first order elastic and the 
second order elastic curves is caused by the P-A moments. The second 
order elastic-plastic analysis coincides with the second order elastic 
analysis until the plastic moment Capacity is reached at some location 
in the frame. Subsequently no further moment increase is permitted at 
this location and the stiffness of the overall frame decreases. When 
four such plastic hinges have developed, a mechanism is formed, and 

the frame can no longer take additional horizontal load. As additional 
Sway occurs the horizontal load must decrease due to the increased 

P-A moments. The second order elastic-plastic analysis closely approxi- 
mates the true frame behavior. In addition to P-a moments, a second 
order analysis may include the influence of the axial load on the stiff- 
ness and carry-over factors of columns; as well as the influence of 
axial shortening, residual stress, the spread of inelastic zones along 
the length of a member, the finite column width, and strain reversal. 

A number of second order analysis procedures have been 
developed for multi-story frames subjected to combined vertical and 
horizontal loading (4,6,7,8,9,10,11 and 12). References 6, 7 and 9 
consider the effect of axial load on the stiffness and carry-over 
factors, (stability functions), of columns and girders, while References 
4, 8 and 10 consider stability functions for columns only. The axial 
forces in the girders of a multi-story frame are usually small and thus 
the change in girder stiffness due to axial load may be neglected. 


References 4, 6, 7, 8, 9 and 10 consider the effect of the 
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axial shortening of the column members on the force distribution and 
deflections of the frame. In References 4 and 10 it was reported that 
axial column shortening increased the sway deflections of slender 
multi-story frames by as much as 30% at working load, however, the 
ultimate capacity of the frames was little affected by axial shortening. 
Thus axial shortening is an important consideration in frames designed 
to limit sways at working load. 

The influence of the residual stresses produced by the rolling 
and cooling process is considered in References 8 and 9. Parikh (8), 
modified the column moment-curyature relationships to compensate for 
the decrease in bending stiffness due to the yielded condition of the 
cross-section, for axial loads greater than 0.7 Pie where Py represents 
the yield load of the column. Burnstiel, (9), formulated the member 
stiffness matrix so that it accounted for the gradual penetration of 
yielding, including the presence of residual stresses, the spread of 
inelastic zones along the member length, and strain reversal in pre- 
viously yielded fibres. With this rigorous treatment, however, only 
relatively small structures have been analyzed. 

References 10, 1] and 12, consider the effect of finite 
column width on the Jateral stiffness of the structure. Considering 
the width of vertical members reduces the clear span of the girders, 
thus increasing the bending stiffness and decreasing the fixed end 
moments. End hinges are forced to form at the column face. As well, 
the rotation of a column of finite width introduces a relative dis- 


placement of the ends of the connected girders. The total stiffening 
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effect is significant in shear wall structures with stiff connecting 
beams. 

Except for Burnstiel, (9), who used stiffness matrices to 
describe member behavior, all other investigators mentioned in this 
chapter assumed the moment-rotation response of frame members to be 
elastic-plastic. An increment of load is applied to the structure 
and the resulting joint rotations and displacements are determined. 
The column and girder moments throughout the structure are then cal- 
culated, and, if the plastic moment capacity of a section is exceeded, 
a hinge is inserted into the structure and the deteriorated structure 
reanalyzed. Two basic methods have been used to account for plastic 
hinge formation. 

The first approach, developed by Jennings and Majid, (6), 
involves adding one unknown to the displacement vector, (the plastic 
hinge rotation), each time a new hinge is formed. This approach was 
extended by Davies, (7), to include hinge reversal, (unloading), by 
replacing a closing hinge by a "locked" hinge with a rotational dis- 
continuity. 

The second method of including the influence of the plastic 
hinging regions was developed by Parikh, (8). Slope-deflection equa- 
tions, expressing the end moment of a column or girder in terms of the 
end rotations and displacements, are first developed. Joint moment 
and shear equilibrium equations are deriyed from the member slope- 
deflection equations. The member slope-deflection equations are modi- 
fied for the particular hinging configuration in the member, resulting 


in changes in the coefficients of the related equilibrium equations. 
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No additional unknowns are introduced on the formation of a plastic 
hinge. This method has been used in References Asics lO fel Weand 12. 
Majumdar, MacGregor and Adams, (11), have presented a method 
of analyses in which the structure is lumped into equivalent frame and 
shear wall systems. The advantage of the lumping procedure is the re- 
duction in the number of unknown rotations and displacements that is 
achieved. Wynhoven and Adams, (12), have extended this procedure to 
develop a three dimensional analysis for frame - shear wall structures. 
Extensive experimental work has been performed as part of 
the process of developing rational and economical design methods for 
multi-story braced and unbraced steel frames. Results of combined 
loading tests on large scale, multi-story frames are reported in 
References 11, 19 and 20. Yarimci, (20), and Yura, (19), present the 
results of tests on three-story unbraced and braced steel] frames 
respectively. Majumdar, MacGregor and Adams, (11), describe the 
results of tests on four-story frame - shear wal] structures, designed 
to simulate the behavior of the lower stories of large frames. In all 
three investigations, the actual test behavior was accurately predicted 


by a second order, elastic-plastic analysis. 


2.3 Frames Subjected to Vertical Loads Only 


The studies outlined in SECTION 2.2 were concerned with the 
behavior of frames under combined gravity and horizontal loads. The 
results of investigations into the behavior of planar frames subjected 


to gravity load only are discussed in this section. 





: . a | ' i : 
a lel ais = ae | -s cordilo (hii aro 






if | Cina 
ane | 
¥ 
ov ‘ Tbe ibe te ci -eayretal - 
v n ’ ' ‘ ' ‘ a 
‘ i - { rire 
; f I ole ian eeee 
4 
j i AQ i 
4 
' ! 
f 
F 
% 
ay i : 
a ¢ 
° be 
+ Al 
(14 ‘ * t 
r i] 
’ t 
ban a 


. drt aay 4 (tegt GAs Jivided Sil Seta 

file 
= 
i i 7 “4 7, =| ] Hover 


; . ‘uid bopoee £4 


ne bat | a Sat0ee o huis “a 







ay erty iene = WOT Fde oF teint igor. se ae 
= ‘ @ 
3 : j 


giheet Gainsioa’ Ww wiry 
. ee 





F 
it 
«e 










ey ¢ Fat agi eet awn Fae 
= i 


' ot A 


13 


When a symmetrical unbraced frame is subjected to symmetri- 
cally applied load, its deflection configuration will also be 
symmetrical. However as the applied load reaches its critical value, 
the structure may buckle into an asymmetrical (or sway) configuration, 
and large lateral displacements may develop. At this instant the 
frame has lost its resistance to any imposed lateral force, and buckling 
has thus terminated the load carrying capacity. 

The elastic and inelastic buckling loads of the portal frame, 
shown in FIGURE 2.1, are illustrated in the figure. Whether or not 
such a frame will buckle with its members remaining elastic depends 
largely on the slenderness ratio of its columns. A frame with very 
Slender columns will buckle elastically, while a frame with more 
stocky columns will undergo some yielding prior to buckling. The 
buckling load of such a frame may be above or below its simple plastic 
beam mechanism load. 

Two basic approaches have been developed to study the frame 
buckling problem. The bifurcation approach attempts to determine the 
load at which frame buckling will occur by computing the vertical load 
level corresponding to the existence of both a Straight and a deformed 
equilibrium position. Numerous studies have been reported on the 
inelastic buckling strength of single Story frames using this approach 
mlsee?6se177ande21)s 

The second approach, known as the small-lateral-load approach, 
is illustrated in FIGURE 2.2. A number of trial gravity loads, (Wy Wo), 
are selected, For each trial load, the response of the frame to a 


gradually increasing lateral force, (H), applied at each floor level, 
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is analyzed (FIGURE 2.2a). The response is represented by a load - sway 
deflection, (H-A), curve (FIGURE 2.2b). On each curve the lateral load 
reaches a maximum, baa at a certain sway deflection. The value of 


aac becomes smaller as the gravity load, w, increases. A curve relat- 


ing eae and w, aS shown in FIGURE 2.2c, may be obtained. The critical 
load, Wer» is reached when the curve intersects with the w-axis. This 
implies that, at the critical load, no lateral force is required to 
produce a sway deflection. 

McNamee, (14), approximated the small-lateral-load approach 
by considering the behavior of one and two bay frames under proportional 
loading, with successive decreases in the percentage of lateral load. 

A second order, elastic-plastic slope-deflection formulation, including 
the effect of the stability functions on the column stiffness, was used. 
Frame buckling tests were performed on three, three-story, pinned base 
frames. The second order, elastic-plastic analysis accurately predicted 
the behavior of the test frames. These tests represent the only large- 
scale, multi-story, frame buckling tests reported in the literature. 

The discussion presented above pertains only to symmetrical 
frames under symmetrically applied loads. For unsymmetrical frames, or 
symmetrical frames subjected to unsymmetrical loads, sidesway deflec- 
tions develop from the initial application of load. The situation is 
- therefore similar to the case of combined loading. No analytical or 
experimental studies have been reported for this general case of an 
unbraced frame. 


In a braced frame, the bracing must be designed to prevent 


frame instability under vertical load only. The behavior of braced 
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frames subjected to vertical load only is similar to that of unbraced 
frames. No studies have been reported on braced frames under vertical 


load only. 


2.4 Summary 


A brief review of available second order, elastic-plastic 
analyses for frames subjected to combined vertical and horizontal loads 
and vertical loads only is presented in the preceding sections. On 
the basis of previous studies, the displacement method of analysis 
using slope-deflection equations for members, is chosen for the present 
investigation. The slope-deflection equations are modified to include 
hinge reversal, so that a greater range of loading sequence possibilities 


can be studied. 
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CHAPTER III 
MEMBER ANALYSIS 


3.1 Introduction 

The response of a member to an applied load or moment involves 
many factors. In the elastic range, the response depends on the loading 
condition, the member length, the boundary conditions and the cross- 
section properties. As yielding occurs, the member properties are 
influenced by the gradual penetration of yielded zones from the extrem- 
ities into the web, and the properties then change along the member 
length due to the different strain conditions existing in each segment 
of the member. The advent of yielding is itself complicated by the 
residual strains in various fibres of the member as well as the differ- 
ences in material properties that exist in the various plates comprising 
the cross-section. Although analyses have been performed (on very 
Simple structures) which do account for some or all of the above fac- 
tors, it is at this date considered impractical to attempt such an 
analysis for large planar frames. 

The basic assumption made in the present analysis is, that the 
behavior of any frame member can be defined in terms of the elastic- 
plastic, moment-rotation, (M-0), relationship shown in FIGURE 3.1. End 
moment is plotted as a function of end rotation for a member subjected 
to a particular set of boundary conditions. Mp» (or Moc if reduced for 


axial load), is the plastic moment capacity of the cross-section; 
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85> (or Bp)» is the rotation corresponding to the attainment of the 
plastic moment capacity; and P is the axial load on the member. The 
member is assumed to remain elastic until the plastic moment capacity 
of the section is reached. For rotations greater than Op» (or Ope)» 
the section is assumed to remain at the plastic moment capacity, 
(except in the case of hinge reversal at the ends of a girder, where 
the section is assumed to unload elastically). The slope of the 
initial portion of the M-e relationship is proportional to the elastic 
flexural stiffness, (EI), of the cross-section. No change is made in 
the value of EI due to yielding of the cross-section under high axial 
loads. 

The "exact" response of a member to an applied moment can be 
determined from the material stress-strain relationship, obtained from 
steel coupon tests, combined with a knowledge of the residual strain 
distribution. The moment-thrust-curvature relationship at a particular 
section is determined by integrating the resulting stresses in each 
fibre over the member cross-section. The moment-rotation curves for 
the member are then obtained by integrating the section moment-thrust- 
curvature relationships along the length of the member. Such moment- 
rotation curves, accounting for the residual stress distribution, are 
presented in Reference 15 for various end moment and axial load ratios. 
Typical examples of such curves are shown in FIGURE 3.2. In all cases 
except that of symmetrical single curvature, (FIGURE 3.2d), the assump- 
tion of elastic-plastic moment-rotation member behavior, (represented 


by the dashed lines), is excellent. 


| 
hae 
—— 4 J : 
ij ' 
7 ' t ' 
: : 
| 
: 
, 
ri 
ii 
' 
if f 
rey 
: 
~ 1% " 
AOLSILIA ai Lou 


Sin « 


ROT IG beet falan bin, '. 


> ad | 
’ 4 : Jat 
uf nt eee 


a % 
4 
4 


i Se iy 


Ob SB MG) rt wewhe 910. Yara “Hotw te, eehgpeee 

















(OSS Tp OT? Bt » Cael 8) 5g 
ins {yi eune Jomtien Sean 
a i f oF renahs 7 a 


> 


; ool poo 
ct mioeasdl 


on 2 Seal 


s 
| 4,'? 


; | $ doheeen e mbtesg J 


a a0 A 
‘ y 
r , ernie yin, Te ) 


~ 


~ a 
: j fj liom; euler 


Cy ti 375 “Cr Sa 


re . 
nse bontinee 
» 


‘ ‘ . ® de 


a tents it! pique 


Rd Niel “phy VWOVO i 
~ 


i) at) Con ‘socheaie a 
Ai , HN spofanies vy 


ta IT 


Than eees. ZO Ty 









12y. Ve) ¢) ayewSs) Sh fap ie 


ae - 


, i b (ag a iil 
ae Sat 


wD 
. 


— i 


20 


For a column in symmetric single curvature the maximum column 
moment occurs at midheight due to the secondary Pé moments. Thus the 
first hinge to form is at this location. After the formation of the 
first hinge, each half of the column is treated separately. Since no 
moment increase is permitted at the hinge, the column end moment must 
unload as the midheight lateral deflection increases. Tne end moment- 
end rotation relationship derived in this manner is shown as the dashed 
curve in FIGURE 3.2d. Agreement with the "exact" curve is good (al- 
though the peak of the curve is overestimated). Thus the symmetrical 
Single curvature case can be handled by an elastic-plastic, moment- 
rotation relationship as long as the secondary Pé moments are accounted 
for when the maximum column moment is determined. 

Inherent in the assumption of an elastic-plastic moment 
rotation relationship is the neglect of the spread of inelastic zones 
along the Jength of the member; plastic hinges must form at discrete 
points. The elastic-plastic member response is conveniently incor- 
porated into the standard slope-deflection equations. Such a formula- 
tion is used in the present analysis. 

A number of further assumptions are made: it is assumed that 
all members are prismatic; shear deformations are neglected; and local 
buckling and out of plane behavior are assumed not to effect the member 
response. The influence. of the axial shortening of the girders on the 
force distribution in the frame is neglected, as is the influence of 
the axial force on the stiffness and carry-over factors of the girders. 
Diagonal bracing members are assumed to span between the geometric 


centers of diagonally opposite joints, and are assumed to resist only 
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axial tension and compression. 
The slope-deflection equations for the girders and columns 
are developed in SECTIONS 3.2 and 3.3 respectively. An analogous 


approach for diagonal bracing members is developed in SECTION 3.4. 


3.2 Girders 
3.2.1 Girder Response 

Girder response is assumed to be elastic-plastic with elastic 
unloading, as illustrated in FIGURE 3.3a. In this figure, Map is the 
moment at end A of the girder; 8nB Ls the rotation of end A of the 
girder; On is the rotation of the joint A; Onpp 1S the plastic hinge 
rotation at A, at the instant of hinge reversal at A; A8 np and AG, are 
the changes in Sap and ne respectively, after hinge reversal at A; 
and Mp is the plastic moment capacity of the girder. The plastic hinge 
rotation at A is the difference between the rotation of the end of the 
prder: oe and te joint rotation, Op. In the loading sequence shown 
in FIGURE 3.3b, the numbers 1, 2, 3 and 4 refer to the loading stages 
corresponding to FIGURE 3.3a. From stage 1 to 2 the moment increases 
linearly with increase in rotation. The slope of this portion of the 
moment-rotation curve is a function of the girder section properties, 
(elastic), and the boundary conditions. At stage 2, a plastic hinge 
develops at end A. Between stages 2 and 3 the moment remains constant 
at its plastic value; the hinge at A continues to rotate. At stage 3, 
strain reversal occurs in the plastic hinge as the hinge angle attempts 
to decrease. At this stage the hinge becomes locked with a rotational 


discontinuity, 8 app» and the girder moment-rotation curve again becomes 







et 22g lan ohana: & 
" , ry peek Tye ne reels aff 


’ 
’ . 
r ‘ 1 4 ; uh 
i? 
i 
{ 
* 
i ij i; Teil fT } 
‘ 
Ad 
ef’ 
i» 
' 
t ‘ 
~ h ' 


wii aP a Ju oat 


fin 











ro TCT DP io Stats! 
+1. 68h Sy  iadeaeael 


ae ee a 


4.0. nat thing. Sik {2 spvisblet av -42eq0ne 


seatiegetg aeiione thi / te WOE TOR IT: Bel oyvegs Dib 






»— Bal af. car > .5 i ‘I ES ai a ih j ke, ¥ Ainiinn omy ven “toi 
mas enlensy oe at) é bas. 5 s eauh apes a bw ds 


i aH : 7 : - a4) 
= <5 a 


: - p i aoe Fe 7 fg ba 
: : i -¢ _ veg by a 
: ry ral 





22 


elastic. Between stages 3 and 4 the hinge rotation remains constant 
and the moment at end A decreases elastically. 
3.2.2 Girder Slope-Deflection Equations 

The girder notation and sign convention are shown in FIGURE 
3.4. "A" refers to the column-girder joint at the left end of the 
girder; "B" to the right end. Wa and Wp are the widths of the columns 
at joints A and B respectively. L is the clear Span of the girder. 
Moments are clockwise positive acting on the girder; end shears are posi- 
tive upwards. An interior hinge is shown at C, a distance x from the 
left end of the girder, and y from the right end. Joint rotations are 
positive clockwise, and joint deflections are positive downwards. The 
inelastic hinge rotation at A, 8 app» is equal to the difference between 
the rotation of the left end of the girder, Bags and the rotation of 
the joint A, Ons Similarly Op ap is equal to OB -Op- The hinge rotation 
at C is equal to the rotation of end C of the girder segment CB, minus 
the rotation of end C of the girder segment AC. Doubly subscripted 
quantities refer to the girders, and singly subscripted quantities to 
the joints. 

The rotation of a column of finite width introduces a relative 
displacement of the ends of the connected girders, as illustrated in 
FIGURE 3.5. If joint A rotates an amount 8 ys the left end of the girder, 
in addition to an increase in rotation, is displaced by an amount 
A = Waea/2- The slope-deflection equations have been modified by Clark, 


(10), to include this effect, and are: 





oa 


Map = Eng + LA og + hoy, carers 

+ oy (84-53) + Menge (3:1) 
Nea = AE Sag + SE hog + AE ogy + EL TB, 

i = (Sq-Sp) + Mega i, 


where Maps Mea = moments at the left and right end of the girder, 
respectively, 
8 np? Opn = rotations of the left and right ends of the girder, 
Op» Pear rotations of joints A and B, 
Sa» 5p == -vertical displacements of joints A and B, and 
Menge epa = fixed end moments at the left and right ends of 
the girder. 


3.2.3 Hinge Reversal 


Two loading sequence possibilities require the consideration 
of hinge reversal at the ends of the girders. FIGURE 3.6a Snows a 
frame which has hinged under vertical load only. When the frame sways, 
due either to frame buckling under increasing vertical loads, or to the 
application of a horizontal force, the windward hinge angle, at A, 
attempts to decrease in magnitude, as illustrated in FIGURE 3.6b, while 
the hinge rotation at B, the leeward side, continues to increase. 


Since the plastic hinge rotation cannot decrease, and the girder moment 
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at A decreases elastically, the hinge is effectively "locked". The 
resulting frame, with a rotational discontinuity at the left end of 
the girder, is shown in FIGURE 3.6c. 

The action of the hinge at A can be related to the girder 
moment-rotation relationship shown in FIGURE 3.3a. Hinge reversal 
occurs at the left end of the girder, (joint A), at stage 3. The 


8 


plastic hinge rotation is locked at a value ABP" 


At stage 4, the 


moment, Maps is given by the expression: 


- 4EI ae 2EI 
Pipi ARPae tae “AB Le oN cL ORA 
BF Te" GEL ( Nea 3.3) 
= OTE Thedeyree 2a eon hon AMeag (3. 


where Mapp = plastic moment capacity at the left end of the girder. 
The prefix A before specific quantities indicates the change in the 
particular quantity between stages 3 and 4, (that is to say, from the 


time of hinge reversal). 


App = AB, = Onn - Oy (3.4a) 
AGan = OaBA - Opn (3. 4b) 
AQ, = ong ac, (3340) 
AS, = oan ay (3.4d) 
ASR = Sap 7 Sp (3.4e) 
Meng = Meng > Meqp (3.4f) 
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where Baga = rotation at the right end of the girder, at the instant 
of hinge reversal at A, 
8nns ap = rotations of joints A and B, respectively, at the 


instant of hinge reversal at A, 


Sapp Sap = vertical displacements of joints A and B, at the 
instant of hinge reversal at A, and, 

Map = fixed end moment at the left end of the girder, at the 
instant of hinge reversal at A. 


Substituting EQUATIONS 3.4 into 3.3 and rearranging: 
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After hinge reversal at A, the girder rotation at A is given by: 


Ong = On + 8 app (3.6) 


Substituting EQUATION 3.6 into 3.2 and rearranging: 


(3.7) 


Similarly, after hinge reversal at B, Map and Mea are given 


by the following expressions: 
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vise (34 SETA Bet 
Wag i AR Poi ne top 
: (3.8) 
(ed ey ae ' 71 ee 
ai (5a-8p) + Meng + [> pap 
eel 3e1 "A "By EI 
Meee. Gays sp eipee One tine lari, 
sae _ 261 —— _ 361 “B —— 
2 (5,763) + Mega + Maap - “[~ Spag > “DT ga (3.9) 


where pap = plastic hinge rotation at the right end of the girder, 


at the instant of hinge reversal at B, 
pap = rotation of the left end of the girder, at the instant 
of hinge reversal at B, 
cre pp = rotations of joints A and B, respectively, at the 
instant of hinge reversal at B, 
Seq: or = yertical displacements of joints A and B, at the 
instant of hinge reversal at B, 
Mepa = fixed end moment at the right end of the girder, at the 
instant of hinge reversal at B, and, 
Mp ap = plastic moment capacity at the right end of the girder. 
Comparison of EQUATIONS 3.5, 3.7, 3.8 and 3.9, with EQUATIONS 
3.1 and 3.2 shows that the expressions for Map and Mens after hinge 


reyersal at either A or B, are similar to the corresponding expressions 
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prior to hinge reversal. The difference is a Single constant tern, 
(or combination of terms), that can be evaluated at the instant of 
hinge reversal. 

Two assumptions are made regarding hinge reversal in the 
girders. The first is that hinge reversal will not occur at an 
interior hinge. In the situation where an interior hinge would form 
under vertical load, a superimposed sway motion would cause the hinge 
rotation to increase. The second assumption is that hinge reversal 
can occur in only one end of any girder. For the loading sequence 
possibilities considered in this dissertation, this would normally 


be the case. 


3.2.4 Girder Hinge Configurations 

In this section the different girder hinging possibilities 
are discussed, and the modifications to the standard Slope-deflection 
equations necessary to account for the inelastic action, are presented. 

A plastic hinge may develop at either end of a girder, or 
within its length. Once formed, a hinge is assumed to remain in its 
origina] position. The different hinge configurations considered in 
the analysis are illustrated in FIGURE 3.7. Girders in each of the 
sixteen hinge patterns are shown. The possible sequences of hinge 
formation and reversal are indicated by arrows. In configuration 1, 
the girder is elastic. Suppose, under increasing load, the plastic 
moment capacity of the section is exceeded at the left end. A plastic 
hinge is inserted and the girder hinge configuration changes from 1 to 


2. If a hinge then forms at the right end, the girder is in hinge 
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configuration 5. Suppose a lateral load is applied to the frame caus- 
ing the frame to sway to the right. The hinge at the left end of the 
girder reverses. The girder, with a rotational discontinuity at the 
left end, is now in configuration 13. If a further hinge develops in 
the interior, the girder is finally in configuration 20. Many other 
sequences of hinge formation are possible. 

The slope-deflection equations are modified to include 
plastic hinging under the following conditions: 

1. At the end of a member which does not contain a plastic 
hinge, the rotation of the end of the girder is equal to 
the joint rotation. The moment at such an end is dependent 
on the girder rotations, displacements and loading. 

2. The moment at a hinge is equal to the plastic moment capacity 
of the girder. The appropriate girder slope-deflection 
equation can then be used to express the inelastic hinge 
rotation in terms of the member loading condition and the 
joint rotations and displacements at its ends. 


The slope-deflection equations may be expressed in the form: 


My Pane 


ap = at®a * Cno®g t Cag (ynSg) + Cag + Cag (3.10) 


Mo, = iC 


BA = ©p19q * Cgo%g + gz (SqnSg) + Cag + Coe 


The values of the coefficients Cay? Cao» Cn3 and Cage and Cay> Cro» 


C33 and Cee are summarized in TABLES 3.1 and 3.2 respectively. Cas 


and Ces are constants computed at the instant of hinge reversal. They 
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are given in TABLE 3.3. Expressions for the plastic hinge rotations 


for each of the hinge configurations are summarized in TABLE 3.4, 


3.3 Columns and Shear Walls 
3.3.1 Introduction 

The primary function of a column in a multi-story structure 
is to carry the moments and forces from the members framing into it. 
It may also be required to contribute to the lateral stiffness of the 
structure. A shear wall, on the other hand, is designed primarily to 
resist lateral forces. Shear walls are normally many times stiffer 
than columns, and are usually much greater in width. It is not un- 
common for a shear wall in a service core area to be one million times 
stiffer than a typical] column, and have a width equal to the story 
height. In the present analysis columns and shear walls are treated 
identically. 

The behavior of a structure can be considerably influenced 
by the width of columns or shear walls. The clear span of the girders 
is reduced and the girder hinges are forces to form away from the 
column centrelines, increasing both the strength and lateral stiffness 
of the frame. The lateral stiffness of the frame is also increased due 
to the greater rotational restraint afforded by the girders as they 
undergo a relative displacement due to column rotation, (as discussed 


LISSEGRLON S252) 


3.3.2 Column Response 


The response of a column in the structure is assumed to be 
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elastic-perfectly plastic, as illustrated in FIGURE 3.8. The moment 
at the lower end of the column, Mi yp is plotted as a function of the 
rotation of the lower end of the column, ey For given boundary condi- 
tions, it is assumed that an increase in end rotation will result in an 
increase in moment, until the plastic moment capacity of the column is 
reached. The end moment is thereafter held at the plastic moment 
capacity of the section, regardless of any change in end rotation. 

The effect of axial load on the stiffness and carry-over 
factors for a column is considered by using the stability functions, 
C and S, as tabulated in Reference 23. Also considered, is the effect 
of axial load on the plastic moment capacity of the cross-section. 


The plastic moment capacity of a column is given by the equations (23): 


“ P< 
Moc = Mp Sie Oe 15 (os12) 
y 
ES P P 
Moe = 1.18 M, GA -5-) , D> 0.15 (513) 
PC U Py Py 


where Moc = plastic moment capacity of the column, reduced for axial 


load, 
Mp = plastic moment capacity for the column without axial load, 
P = axial load in the column, and, 
P. = yield axial load in the colum. 


If the column axial load changes after the formation of a plastic hinge, 
the hinge is maintained and the moment at the hinge is adjusted accord- 


ing to EQUATIONS 3.12 and 3.13. 
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Not considered in the analysis is the effect of residual 
stress on the column stiffness. Assuming a maximum compressive 
residual pthess oh nO Pa Oy s (where oy is the yield stress of the 
column), yielding of portions of the column cross-section, for axial 
load ratios, (P/P.) greater than 0.7, will reduce the effective 


moment of inertia of the column. This effect is ignored. 


3.3.3 Column Slope-Deflection Equations 
The column notation and sign convention are shown in FIGURE 

3.9. "L" refers to the column-girder joint at the lower end of the 
column; "U" to the upper end. P is the column axial load, positive 

in compression, and h represents the column height. Bending moments 

are clockwise positive acting on the column ends; end shears are positive 
to the left. An interior hinge is shown at D, a distance x from the 
lower end of the column, and y from the upper end. Joint rotations 

are positive clockwise, and the yertical deflections of the joints 

are positive downwards. Story sway is positive to the right. The 
plastic hinge rotation at the end of the column, (6 


Lup °F ®ypp)> is 
equal to the difference between the member end rotation, (8 y or Oy): 
and the corresponding joint rotation, (9) or Oy) The inelastic 
rotation at D is equal to the difference in slopes of the column 
segments LD and DU at D. Doubly subscripted quantities refer to 


the columns; singly subscripted quantities to the joints. 


The basic slope-deflection equations for columns are: 


wie] SEL (cys 
May = uth fu t o (A) -4y) (3.14) 
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_ SEL CEL (CHS)EL 
My, == o6,, + nh 8yt * 5 (A, -A,)) (3.15) 


where Meyp MUL = moments at the lower and upper ends of the column, 
respectively, 
8 y? 8, = rotations of the lower and upper ends of the column, 
Ar» Ay = Sways of the upper and lower ends of the column, 


E 


I 


modulus of elasticity 


I 


moment of inertia, and 


h 


column height. 

C and S are the stability functions discussed in SECTIONS 3..c2.8 For 

columns subjected to a tensile axial igadseG.is taken as 4, Svas 2. 
The maximum interior column moment, including the effect of 

axial load, is given by the expression (10): 


Zhe Rutan : 
MUL + My aM My cos Kh 


Se as EME eer (3.16) 


Muax = Sin Kh 


Sy fp 
where K = / ft 
MMAX occurs a distance x from the lower end of the column, given by: 


MUL = Mey cos Kh 


eal -] 
xX = ¢ tan [ - Mtcin Rh ] (3217) 


LU 


3.3.4 Column Hinge Configurations 


Since hinge reversal in the columns is not considered, only 
eight hinge configurations are required. These are illustrated in 
FIGURE 3.10. The possible sequences of hinge formation are indicated 


by arrows. 
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The slope-deflection equations are modified to include plas- 
tic hinging in the same manner as for the girders. The equations may 


be expressed in the following form: 


My = C18) + C) 58y + Ci 3 (A) -Ay) + C4 (3.18) 


Mop = Cy7 9) + Cyo8y + Cy. (A, -Ay) + Cua (3.19) 


The values of the coefficients Cy: Cos C3 and C a> and Cu Cio» 
C3 and Cua are summarized in TABLES 3.5 and 3.6 respectively. 
Expressions for the plastic hinge rotations for each of the hinging 


configurations are given in TABLE 3.7. 


3.3.5 Axial Shortening 


The present analysis considers the effects of axial column 
Shortening on the force distribution in the structure. A column sub- 
jected to axial load is assumed to behave elastically. The axial 
shortening, 6, may be expressed as: 

Ph 


aaa hee 3200) 


where P = axial force in the column, 


| 


h = column height, 


A 


column area, and, 


E 


i 


modulus of elasticity. 


EQUATION 3.20 may be rearranged into a more suitable form: 


AE re oe 
Fear (sy) 5) ehreb 


Vow Phe; 
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where by 8), = vertical deflections of the joints at the upper and lower 


ends of the column, respectively. 


3.4 Diagonal Bracing 
3.4.1 Member Response 


Diagonal bracing members are considered capable of transmitt- 
ing only axial forces. The assumed load-deformation relationship for 
a typical bracing member is shown in FIGURE 3.11. The axial load in 
the brace, P, is plotted as a function of the brace elongation, e. Py 
is the yield load of the brace in tension, (equal to the area of the 
brace multiplied by the yield stress). PeR is the critical axial load 
of the brace in compression. Since the brace is not assumed to trans- 


mit moment, it can be considered as pinned at each end. The critical 


axial load is defined as the Euler load: 


Lee 
of EAr 
Pop = mets (3322) 


where E = modulus of elasticity, 


A 


area of the brace, 


r = minimum radius of gyration of the brace, and, 


L 


length of the brace. 

The Euler Joad is the critical axial load for slender bracing members, 
(such as light angles). However the radius of gyration of the brace is 
assumed to be independent of the other properties of the bracing member, 
so that the critical axial load in compression can be adjusted by 


specifying a ficticious value of r. Thus the critical axial load of 
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more stocky bracing members, (which would buckle inelastically), can be 
accounted for, as well as the critical axial load of diagonal members 
which are fastened at midlength. Braces acting in compression can be 


neglected entirely by setting r = 0. 


3.4.2 Diagonal Bracing Load-Deformation Equations 

The diagonal bracing notation and sign convention are shown 
in FIGURE 3.12. Two different diagonal braces are considered: TYPE 1 
which slopes upward to the left, and TYPE 2 which slopes upward to the 
right. These are illustrated in FIGURES 3.12a and 3.12b respectively. 
"YU" refers to the joint at the upper end of the brace, "L" to the lower 
end. Ay and Ay are the sways of the joints at the upper and lower ends 
of the brace, respectively. by and 5) are the vertical deflections of 
the joints. L is the length of the diagonal brace. In FIGURES Sec 
and 3.12d, the change in length of the brace, e, due to a relative 
sway of the ends of the brace, A, is i hus trated farya i YPE 1, andy TYPE 
2 brace respectively. In FIGURES 3.12e and 3.12f, the change in length 
of the brace, due to a relative vertical displacement of the ends of 
the brace, 6, is illustrated for the two types of braces. The axial 
load in the brace is considered positive in tension. Sway is positive 
to the right and vertical deflection is positive downwards. 

The axial load-deformation relationships for the diagonal 
bracing members are: 


ade he 


Fy = rE sina cosa (5, -d,) + rE cos“a (A, ~Ay) (3.23) 





Pe > 
' - , ae 7 
Sh oldman! 0) 1) 9 COS FT Gare eee 

+ : . 


+ 


q ; ‘ rl ak ! v “ch Var bay { ah toe 


















me PF Jyne blo te ope eng eke 
ry a i 


} ie peer yit| 290 
; ihe gat 3 yl Se 


ach. Peg rch on 
re 


_ 
€ Pw 
& i 
POs os id Dt ie PSG, Sa 


no eet late 
i sleet Sob ee 


a ee TG : ets yl ise y* ae 


~ 


> 


¥ 
acest eet 2a 
r \, 
~ . i : r 
on oO H2)as| ef) eed elute on 
( Sint 4 inte ods, PRE 


ad de le vies sul he ie 


fi 1 20S) Sone * 
- 
lous daay Sh Peles acqgcndh anand aa 
| . at . | 
ei) AY j i Ps | ry G é S670 E 
iy | | 





7 a | . . an et sad Bad SF 260. 





: » et i] (eat : ‘ r } ( ae fe wi wae sid ott ; 
ie RN ON) 40). eho ities noi awinebkent tdmea ae Oe 
| | | ON Re ele bent «1 GPa al . 






7 tie? | 
6 Sa ls 
ie A ie 


36 


Fy = FE sin’ (5, -5y) +e Sina COSa (A) -Ay) (3.24) 
tres 2): 

foe re sina cosa (8) -5y) = cos“a (A) -Ay) ee) 

Fy = re sin*a (8-8) - r= cosa sina (A, ~Ay) (3.26) 


| 


where Fy = horizontal component of axial force in the brace, 


Fy vertical component of axial force in the brace, 


A = area of the brace, 
E = modulus of elasticity, 
L = length of the brace, 


6) dy = vertical deflection of the joints at the lower and 
upper ends of the brace, respectively, 

Ay sAy = horizontal deflection of the joints at the lower and 
upper ends of the brace, and, 


a = angle between the brace and the horizontal. 


3.4.3 Yield Configurations 


Three yield configurations are considered for diagonal brac- 
ing members. In yield configuration 1, the brace is elastic. In yield 
configuration 2, the brace has yielded in tension. In yield configura- 
tion 3, the brace has buckled in compression. The axial load- 
deformation relationships for each of the yield configurations are 


expressed in the form: 
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TYPE 1: 
Bae Coit > Cayenne > Cnofy ch Cpe 2} 
Fy = Cp36) - Coady + Cpa, - Cpydy * Cg ae 
TYPE 2: 
Ee Crime Come Cnet Coody P Coe (3729) 
Fy = Gy38) - Cpgsy - SppAy + SppAy * lpg CRS, 


The coefficients Cy: C59 C53> Ca and C55 are summarized for the 
different yield configurations in TABLE 3.8. 

A bracing member in a yielded or buckled configuration is 
assumed capable of again becoming elastic if the axial extension be- 
comes less than the yield or buckling values, respectively. No modi- 
fication to the elastic load-deformation equations are necessary in 


either case. 
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FIGURE 3.9 
COLUMN NOTATION AND SIGN CONVENTION 
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CHAPTER IV 
FRAME ANALYSIS 


4.1 Introduction 

In the previous chapter the behavior of individual frame 
members, as characterized by their M-e relationships, was presented. 
This chapter deals with the analysis of the complete structural 
frame. In the following sections, the frame arrangement and loading 
pattern, the formulation of the equilibrium equations, and the method 
of solution are discussed. The development of a computer program to 


trace the response of the framework is outlined. 


4.2 Frame Arrangement and Loading Pattern 
4.2.1 Frame Arrangement 


The type of frame considered in the analysis is shown in 
FIGURE 4.1. The structure is a regular, rectangular, multi-story, 
multi-bay planar frame. The columns and the girders are rigidly 
connected to one another, and the bottom story columns are assumed to 
be connected to the foundations by springs providing a specified 
degree of rotational stiffness. Pin-ended diagonal bracing members 
can be included in any bay or story. The effect of the width of all 
vertical members is considered in the analysis. Plastic hinges in 
the girders are assumed to occur at the face of the columns. However, 


since the finite depth of the girders is not considered, the column 
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hinges occur at the intersection of the centrelines of the columns and 
girders. The size of the frame which can be considered is limited only 
by computer capacity. 

The column lines are numbered from 1 to M. Floor levels are 
numbered from 1 to N; level one is taken at the foundation. The 
stories are numbered with reference to the level below. A structural 
joint, (column-girder intersection), is designated as JOINT, ys where 
m is the column line, and n the floor level. The structural members, 
and the joint rotations and displacements, in the etry of JOINTS 
are shown in FIGURE 4.2. A girder is designated as orate where m and 
n refer to the joint at the girder left end. A column is designated 
as C » corresponding to the joint at its lower end. A diagonal 


m,n 
bracing member is designated as Be 3 where m and n refer to the 
joint at its lower end, and i refers to the type of brace. A type 1 
brace slopes upward to the left, a type 2 brace upward to the right. 
Other bracing systems, such as the K-bracing system illustrated in 


FIGURE 4.3, can be considered by including a "fictitious" column stack 


with zero area and moment of inertia. 


4.2.2 Loading Pattern 

In order to consider various loading sequence possibilities, 
five different loading systems are assumed to act on the frame, as 
shown in FIGURE 4.4. The live load, wep (men) s and the dead load, 
Wp (aan), acting on the girders are considered separately. Both are 
assumed to be distributed uniformly over the length of the span, 


however, the liye load may be incremented while the dead load remains 
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fixed in magnitude throughout the analysis. Concentrated vertical 
loads, V(m,n), are assumed to act at each joint. These loads may 
include allowances for the weights of walls, partitions and columns. 
In addition, the vertical joint loads may be used to adjust column 
axial loads if different live load reduction factors are used for 
girders and columns (15). In order to simulate the behavior of the 
lower stories of a multi-story frame, column top vertical loads, 

P(m), are included. Lateral loads, F(m), which simulate the action 
of wind or earthquake forces, are assumed to be concentrated at each 
floor level. All load systems, (except the dead load on the girders), 
may be incremented independently, however, all loads within a parti- 
cular system must increase proportionately. The use of the various 
loading systems permits consideration of the behavior of structures 
subjected to vertical loads only, to constant vertical loads and 
increasing horizontal loads, or to vertical and horizontal loads which 


are in proportion to one another. 


4.3 Equilibrium Equations 
4.3.1 Introduction 


The frame analysis technique is based on a displacement 
formulation in which moment and force equilibrium equations are 
satisfied at each joint and for each story of the structure. The 
equilibrium equations are expressed in terms of the joint rotations 
and displacements, using the member force-displacement equations 
developed in CHAPTER III. The resulting system of equations is 
solved for the joint rotations and displacements, which are then used 


to determine the member forces and moments throughout the structure. 
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In the following sections, the moment equilibrium equations, 
the vertical force equilibrium equations, and the story shear equili- 


brium equations, are developed. 


4.3.2 Equilibrium of Moments 

The moments and forces at the ends of the members framing into 
JOINT, are shown in FIGURE 4.5. The forces act in the positive 
directions, as assumed in the derivation of the member force-displacement 
equations. For moment equilibrium, the sum of the moments at any given 


joint must be zero; for JOINT ; this may be expressed as: 


- Mag (msn) - Maa n-1sn) - M, y@aan) - My Qnsn-1) 


wc WC 
fied . mnt — 
A Vag (mon) 3 Vega (in 1,n) 5 0 (AF 1) 


where Mag(msn)s Mpq(m-15n) » M, y(an) and My (man-1) are the moments at 

the ends of the girders and columns framing into JOINT, > and are 

Gaven py EQUATIONS 3.10, 3:11, 3.18 and 3.19 respectively. The terms 
“Lanieal ene 

Vag (sn) ered ld Vegq (irl sn) Seem prenry Ae the moments produced by 

the shears at the ends of the girders acting at the face of the column. 


Referring to FIGURE 4.6, Vag (msn) the shear at the left end of 


GIRDER, 2 is given by: 


M,_(m,n)+M, ,(m,n) 
Vag (msn) = V amon) [ (A523 
m,n 
where Viaatiten) is the shear at the left end of GIRDER, | due to the 
applied load on the girder, (equal to we for a uniformly distributed 


load w). Similarly, 
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Veq(m-1 sn) = Vg (>t sn) + aah VeaVaa Sol S) (4.3) 
m-1,n 
where Vg (trl sn) is the shear at the right end of GIRDER, 1 4 due to 
the applied load on the girder. Similar terms do not arise due to the 
column shears, because they are assumed to act at the centreline of 
the joint (the effect of the girder depth is ignored). 
Substituting EQUATIONS 4.2 and 4.3 into EQUATION 4.1 and 


rearranging: 


WC WC. 
, _mn-15 _ mn-1 


3 





wc wc 
n-] m,n-1| 
- M,,(m-1,n) (eel - M,,(m-1,n) [1 + =-~—] 
AB en BA areata 
Wo n-l 
- Myon) - My, (mon-1) + —3 LV a (mn) Vn (m-1 sn) J = 0 
(4.4) 
Substituting EQUATIONS 3.10, 3211, 3.18 and 3.19 into 

EQUATION 4.4, and defining 


m,n-1 
aye ADS: : 
2L oon 
Cc 
b m,n-1 
aL on 
wc 
(= ae and 
m-1,n 
WC 
? m,n-1 
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70 
the moment equilibrium equation may be expressed as: 
-[a Cyy (msn) +b Cp y(msn)tc Cag(m-1,n)+d Cyo(m-1 ,n) 
+ Cy (man)+C))o(msn-1) Je, -Ca Cao (msn) 


+b Ceo(msn) Je -[c Cy, (m-1n)+d Cp, (m-1n)] 


mtl yn 


on-14n CE) fm) J0, neq EOyy (mon-1) 16, 4 
- [a Cy3(man)+b C,3(m,n)-c Cay3im-1,n)-d Cp3(m-1,n) J Sa 
- [-a Ca3(msn)-b Ca3(msn) J red oar 
ale Ca3(m-1n)+d Cp3(m-15n) J Sed gn Log hon) -Cya(mn-1) J 
AN lis C, 3(m.n) JA, = [Cy3tm.n-1) JA, | 
eala Caq (man) +b Coq (msn) + C Cyq(m-15n) + d Cp q(m-1 sn) 
+a Cy. (mn) +b Can (msn) + ¢ Cyg(m-1 sn) +d Coe(m-1,n) 


WC 
+ glman) + Cyq(myn-1) + 2 (y o(m-I.n)-V, ,(m.n))] (4.5) 


EQUATION 4.5 is the general equation for the moment equilibrium 












0! ore, a ee emma 
= 


obrtnc tn) og) alia abt gy? Tae 


is Cage 
mY Deady EePaD p ? 


Le oJ UND + : 
ne tent (egg e+ 


[Ce 1 go) nan a ee 


im) ° (4h le “I A- 


iu a sy ® : 





CMe Fi dss ate (ae. ag D2 


7) 
of JOINT A in It may be specialized for an exterior joint by dropping 
terms corresponding to a girder or column which does not exist. The 
moment equilibrium at the base of a column cannot be handled by EQUATION 
4.5. Consider the column-support joint illustrated in FIGURE 4.7. The 
column, eaaie is assumed pinned at its base, with a rotational restraint, 
Ke offered by the support. The moment equilibrium equation at the 


Support is: 
-M  -K #6 = 0 (4.6) 


where 6 is the rotation of the column base. 


m, 1 
Substituting EQUATION 3.18 into EQUATION 4.6: 


- (C, (ms1)+#K Je, = [C, o(m,1) Je, 5 


+ [C, 4(m,1)]a, - [C, ,(m,1)] = 0 (4.7) 


EQUATIONS 4.5 and 4.7 express the moment equilibrium relationships of 


the structural frame. 


4.3.3 Equilibrium of Vertical Forces 


Vertical force equilibrium equations are written at each 
joint in the frame. Again referring to FIGURE 4.5, the sum of the 


vertical forces at JOINT. A must be zero: 


Ee + P(m,n) - P(m,n-1) + Vigq(m-1 sn) + Vag (sn) 


> 3 b) 3 3 3 
(4.8) 
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where sen is the applied vertical joint load, 

P(m,n) and P(m,n-1) are the axial forces in the columns above 
and below gOINT respectively, 

Veq(m-1 sn) and Vag (sn) are the shears at the ends of the 
framing girders, and, 

Fy (m#tn-1,1), Fy(m-1,n-1,2), Fy(msn51) and Fy (msn.2) are the 
vertical components of the axial forces in the diagonal 
bracing members framing into the joint. 


Substituting EQUATIONS 4.2 and 4.3 into EQUATION 4.8 results in: 


V Pe P(m,n) - P(m,n-1) + Vg im-1 sn) 








ms 
Map (m-1,n) + Mp (m-1 51) Piet a cane Man (msn) + Mp a(n) 
Laclon wA taen 


+ Fy Cnt] sn-1,1) + Fy(m-1 n= 2) - F(msn51) - Fy (msn ,2) = 0 
(4.9) 


and substituting the member force-displacement relationships, 
(EQUATIONS 3.10, 3.11, 3.28 and 3.30), into EQUATION 4.9 produces 
the vertical force equilibrium equation in terms of the joint dis- 


placements: 
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; ee + Cagim-T sn) f Ca3(mn) + Cy (mn) 


ate 


ae 


ate 


4, 
-. 
i) 
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+ 


Li-Ion Lnelan 


A. (msn) E, (m,n) A.(m,n-1) E,(mn-1) 


7 Da nee iG acl 


n n-] 
Cy3(m-1 sn-1,2) + Cy3(msn,1) + Cy3(mn,2)] 6 


ee + Ca3(m-1.n) 


sn 


Cagtmsn) + Cp 3(mn) 


Cael.n m-1,n a m+] ,n 
ae a sae se. ; 

7 m,n bes mn 
[CpgtmtTon-151) 18g ny + [Cy3(m-Tan-152) 15.4 ny 
[Cpgtmans 1) Isa ney i‘ [Cpstmsns2) Toy nay 
[C,, (m-1,n-1,2) - C5y (tl n-1,1) + Cy, (mons2) - Cy, (mnt) Ja, 
LC), atl n-1,1) - Cy (m-1n-1,2) Ja, | 
[C), (m.n,1) = Cyy(mon.2) Jay 

oy cielo + Cag (m-1 sn) : Cyc(m-1,n) + Ca(m-1n) 
Ln-Tgn 
Cag (msn) + Coq (mn) + Caz (m,n) + Cag (man) 
Lan 

Coq (mt sn-1,1) + Coq (m-1.n-1,2) - Cyq(mn.t) - Coq (mns2) 
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+ Vi jg n- 1m) + Vi acnen) + Ty rec] (4.10) 


m,n 


In the top story the external applied axial load, P(m), is included 


within the brackets on the right hand side of the equation. 


4.3.4 Equilibrium of Horizontal Forces 

Since axial shortening of the girders is not considered, al] 
columns in a given story will undergo the same sway displacement. It 
is therefore necessary to write only one horizontal force equilibrium 
equation per story. In order to include the P-A moments, the story 
shear equations must be formulated on the deformed structure. A 
section of a multi-story structure is shown in FIGURE 4.8. Floor level 
n is given a horizontal displacement relative to floor levels n-1 and 
ntl. The forces acting on the girder at level n are shown in their 
positive direction. a represents the horizontal component of the 
axial forces in the diagonal bracing members. hae and Lil are the 
horizontal forces at the lower and upper ends of the columns. Pe is 
the applied story horizontal load. The axial forces in the columns 
are also shown. The sum of the horizontal forces acting on the girder 


must be zero: 


; willy (heretics GEN) 
etett) eV (iin) V,,, (m,n-1) + F (m,n,2 
WN i eet LU SES UL eos 
M M M-1 
FOSS PM AyD) F(m,n-1) =, F(msn-1,2) =U (4a bt) 
m=2 * m=2 m=1 


Consider the columns in story n and story n-1, as shown in FIGURES 


4.9a and 4.9b, respectively. The moments, shears and axial forces are 
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shown in their assumed positive directions. Taking moments about the 


upper end of column m,n: 


P(m,n) (A -a_,,)-M,,,(m,n)-M,,, (m,n) 
Vj y(msn) = 24.12) 
n 


and about the lower end of column m, n-1: 


P(m,n-1)(A -A_,)+M,, (m,n-1)4M, ,,(m,n-1) 
Vp (msn-1) pepsi oe als new UL > Beer LU fr ct (4.13) 


NaI 
Substituting these values of Ve ymen) and Vu (man-1) into EQUATION 


4.11, results in 


M 
] 
ii rn } ney Mylan) My, (mon) J 


— [P(m,n)A_-P(m,n)A 
hy 1 n 





[P(m,n-1)A.-P(m,n-1)a, 44M, (msn-1)+M) (msn-1) J 


M1 
oD 


M M 
Fo(m,n,2) - ) F(mn,1) ses F(msn-1,1) 
m ] x m=2 m=2 


M-1 
=) 


betitsia bee }ae=O (4.14) 
n=l * 


Substitution of EQUATIONS 3.18, 3.19, S227 and: 3.29 into EQUAI ION 


4.14 produces the story shear equilibrium equation: 
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M Cyo(msn-1)+C, 5(m,n-1) y C, j(msn)+C,,, (msn) 


M C, o(m.n)+C)(msn) 
ea 
m=] n 
M €,,,(m,n-1)+C, ,(m,n-1) 
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m= n-1 


M-1 


: M 
; i, {Cyy(mns2)one1 med + 2, (pik 
M M-1 
+ oe {Cp (msn-1,1)6,, 44} - oe {C54 ( 
M M-1 
by {C,, (msn-1 51) Seen eae) {Cp 
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M  P(m,n)-C, ,(m,n)-C,,.(m,n) M-1 
L3 Hea 
Eero yc eral - Cyo(msn,2) 


M 
HOTS. C Gh nel) yA 
mao De n+] 


M -P(m,nt1)+C, .(m,n-1)+C,,.(m,n-1) M-1 
Ss the ssue 
eet) Vet) Gee (nan=le2} 
m=] Nil m=] bé 
OTE 
+ Gao(im.n=l.l) tA 
m2 D2 n-] 
j M C) (mn) +C 14 (m,n) Cyq(msn-1)+C, q(m,n-1) 
=- {Fo +) -= + 
n 4 h h 
m=] n n-1 
M-1] 
+ L [Cog (mon .2)-Co.(m,n-1 sey 
m= 
M 
+ ep ecpgiman-Ts1)-Cys(man 1) J} (4.15) 


4.4 Solution of the Equilibrium Equations 
4.4.1 Introduction 


The moment and vertical force equilibrium equations at each 
joint, and the shear equilibrium equations for each story may be expressed 


in the form: 
[A] {x} = {b} (4.16) 


where tx} is the vector of the unknown joint displacements, 


{b} is the load vector, corresponding to the vector {x} , and, 
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[A] is the coefficient matrix relating {x} and {b}. The total 
number of unknown joint rotations and displacements in the structure is 
equal to (2M+1)(N-1)+M, where M is the number of column stacks and N is 
the number of floor levels. Thus the square matrix [A] is of order 
(2M+1)(N-1)+M. However for large structures many of the terms of [A] 
are zero. 

Each of the equilibrium equations at a given floor level will 
only include the unknown rotations and displacements at that level and 
the levels immediately above and below. By numbering the unknowns 
across each story, the band width in the coefficient matrix is re- 
stricted to three times the total number of unknowns per story. Because 
the vertical load in the columns is assumed to be known for each cycle 
within a given load increment, and the structure is linearly elastic 
for this same cycle, the coefficient matrix is symmetric. Thus only 
those terms on or above the major diagonal must be stored. Fora 
forty-story, three-bay frame, (N=41,M=4), this technique permits a 
reduction in the required storage for the coefficient matrix from 
364 x 364 elements to 364 x 18. The procedure used to number the 
unknown rotations and displacements is illustrated in FIGURE 4.10 for 
a five-story, two-bay frame. The only unknowns at the ground level 
are the column base rotations, which are numbered consecutively from 
Tait yt0 syight. stror each subsequent floor level, the story sway 
deflection is first numbered, followed by the joint rotation and 


vertical displacement at each successive column across the story. 
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4.4.2 Method of Solution 

The method adopted for solving EQUATION 4.16 is a modified 
Gauss Elimination procedure. A direct solution technique was selected 
so that the computation time could be determined for a particular size 
of structure. For large matrices the use of an iterative solution, 
such as Gauss Seidel, may take considerable time to converge to an 
acceptable result (24). The accuracy of a direct method is more 
easily influenced by error propagation during solution, and for large 
Systems of equations this aspect must be considered before accepting 
the answers obtained. 

In the direct solution technique used, the terms of the 
coefficient matrix, [A], below the major diagonal are transformed, 
row by row, to zero. The vector of unknown displacements is determined 
by back substitution, using the resulting triangular coefficient 
matrix and the load vector. 

Each time EQUATION 4.16 is solved, the determinant of the 
coefficient matrix is calculated. The magnitude of the determinant 
decreases as the structure enters the inelastic range and plastic 
hinges form. This reflects a decrease in the structural stiffness. 

As the slope of the load-displacement curve approaches the horizontal, 
the coefficient matrix approaches a singular condition. In the 
analysis, the structure is linearly elastic between the formation of 
successive hinges (except for the effect of changes in the column 
axial forces on the stiffness of the structure). Thus the determinant 
changes by a discrete amount each time a new hinge forms. In this 


procedure the possibility of the determinant actually becoming zero 
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is remote. When the maximum load-carrying capacity of the structure 
is reached the determinant changes sign and the load must be decreased 


to achieve equilibrium under increasing deformation. 


4.5 Computer Program 


The method of analyses described in the preceding chapters 
Was programmed in FORTRAN IV for the IBM 360/67 system. In this 
section the logic of the program, and the function of each of its 
subroutines, is briefly described. The nomenclature used in the 
computer program is given in APPENDIX A.1. The flow diagrams for 
the individual subroutines are presented in APPENDIX A.2. The 
necessary input data is outlined in APPENDIX A.3, and the program 
listing is given in APPENDIX A.4. The accuracy in the computer solu- 
tion is checked in APPENDIX A.5. 
The frame analysis proceeds in the following manner: 
1. The frame geometry, member properties, design loads and 
loading sequence information are read into the program. 
2. The plastic moment capacities of the girders and the 
critical axial loads of the bracing members are determined. 
3. The member stiffness coefficients, which are independent 
of load, are calculated. 
4. For the particular load increment in question, the loads 
to be applied to the frame are determined. 
5. The terms of the equilibrium equations dependent on the 
applied load on the girders are calculated. 
6. The axial load in the columns is estimated, based on the 


known axial load from the previous load increment, and any 
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additional applied vertical load. 

The plastic moment capacity and stiffness coefficients of 
the columns are determined. 

The equilibrium equations are formulated and solved for the 
unknown rotations and displacements. The determinant of the 
coefficient matrix is also calculated at this stage. If the 
determinant has changed sign the moana returns to step 4, 
and the load on the structure is decreased. 

The column axial loads are calculated. If the axial loads 
differ by more than 1% from those assumed in step 6, the 
program returns to step 7 with the new values of axial load. 
Using the member force-displacement equations, the member 
moments and forces are determined. 

The inelastic hinge rotation at each plastic hinge is 
calculated. 

The girders and columns are checked for additional plastic 
hinging and the bracing members for the attainment of their 
critical axial loads. If any new member hinge or yield 
configurations are detected, the program returns to step 3, 
and the structure is re-analyzed for the given loads. 

The story shear forces are summed to check the accuracy of 
the solution. 

The inelastic hinge rotations in the girders are compared 
with those of the previous load increment. If hinge reversal 
is detected the program returns to step 3, and the structure 


is re-analyzed for the given loads. 















bie al inci ae Gale” fro St them : 
Ase otitaig odT  .% 
HiiOietas poe eet 
'upo qlee tips Sgt a 
ge th By dee ottn ced anor inn | 


ag y Pee Sota ¥ 4600 A 


anal ie 4 décheetel 
: 4 y ria Gaede G?-bets - 
eG? inte AED oat 
i , pwil?. chon vd eRe Fa 
+ aro) mete 
‘a ysis aay papell 
~ 


. Oa? : eet bin Staganem 
niiesion tat ~ 2B 

bate ftealss vt 

cahoov dnp eabheig elt ww 

7 (nt oa Se ea gna 


MAS) Vee “W Ate Vii iehtinsg 7 at 


ai ‘= 
- 


ol e4 Wisse stile bn tng ha eg” Sat faba scnheoney | 2 





M.tavit Gis + casi lee oo ee. Se bre os 
=] *1. Pi} e : 


Se qian! St So iy ot baud eth 2BSyT, Seote ynge qt 





82 


15. At this stage the program returns to step 4, to analyze the 
frame for the next increment of load. 

The MAIN program controls the frame analysis. Its primary 
function is to call the subroutines which perform the necessary cal- 
culations at different stages of the analysis. Subroutine READ per- 
forms steps 1 and 2 of the analysis. Subroutine COEFF calculates 
the stiffness coefficients of the girders, columns and bracing members 
which are independent of the loads on the frame (step 3). Steps 4, 5 
and 6 are performed by subroutine LOAD, and step 7 by subroutine STAB. 
Subroutine EE] formulates the moment, vertical force and horizontal 
shear equilibrium equations for the frame. Subroutine SOLVE solves 
the equilibrium equations for the unknown displacement vector, and 
calculates the value of the determinant of the coefficient matrix. 
Subroutine SUB] converts the unknown displacement vector to the joint 
rotations and displacements. Step 9 of the analysis is also performed 
in SUB]. The girder and column moments are calculated in subroutine 
CHECK], and the members checked for additional plastic hinging. In 
Subroutine CHECK2 the inelastic hinge rotations are determined. The 
axial forces in the bracing members are determined in subroutine 
CHECK3, and the yield condition checked. In addition the horizontal 
shear check is performed. Subroutine HREV performs step 14 in the 


analysis. 
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FIGURE 4.3 
K-BRACING SYSTEM 
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LOADING PATTERN 
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CHAPTER V 
COMPARATIVE ANALYSES 


5.1 Introduction 

The procedure developed in Chapters III and IV is intended 
for the analysis of large multi-story structures subjected to vertical 
loads, alone, or in combination with horizontal loads. The program 
developed for the analysis is able to perform a second order, elastic- 
plastic analysis of an individual planar frame, or a series of linked 
planar frames, all of which undergo the same Sway displacements at 
each floor level. A bent may include bracing members or shear wall 
elements. The changes in column stiffness and plastic moment capacity 
produced by changes in axial load are considered, as are the effects 
of the finite width of the shear walls and the axial shortening of 
the columns. The effect of hinge reversals at the ends of the girders 
on the force distribution throughout the frame is also included. 

The methods of analysis available to date cannot be used to 
check the present method in its most general form. Therefore, it is 
necessary to specialize the analysis and compare the influence of 


each aspect separately. 


9.2 Frames Subjected to Combined Vertical and Lateral Loads 
The first order, elastic response predicted for a number of 


small frames was compared with the results obtained from a STRUDL 
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analysis, (25). The structures analyzed included unbraced rigid 
frames, frames with diagonal bracing, frames with a K-bracing system, 
and frames with shear walls of various widths. The results agreed in 
ailbla Casesic 

The second order elastic-plastic response of a large 
unbraced frame was next compared with the results predicted by Parikh's 
program, (8). The twenty-four story, three bay frame, shown schemat- 
ically in the inset of FIGURE 5.1, was analyzed under the action of 
proportionally increasing vertical and lateral loads. The frame 
member sizes and the design level lateral and yertical loads are 
tabled in Reference 15. The influence of axial force on the column 
stiffnesses and plastic moment capacities is accounted for in both 
procedures. The finite widths of the columns are neglected and the 
live load reduction factors are not considered. The results of the 
analyses are shown in FIGURE 5.1, where the load factor, A, is plotted 
as a function of the top story sway displacement, A. The solid curves 
represent the results of Parikh, which terminate at the ultimate load; 
the dash curves represent the results obtained from the present 
analysis. Results were obtained both considering and neglecting 
axial shortening of the column members. The present method accurately 
reproduces the results reported by Parikh in both cases. 

The twenty-four story frame - shear wall model used in a 
behavioral study by Guha Majumdar et al, (26), was analyzed to investi- 
gate the ability of the present analysis to assess the behavior of a 
structure containing a shear wall element. The frame is shown in the 


inset of FIGURE 5.2. Wynhoven's results, (12), are used for the 
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comparison since these included the unloading branch of the load- 
deflection curve. The member properties and vertical loads for the 
structure are reported in Reference 12. The flexural stiffness of 

the shear wall is approximately fifty times that of the column at all 
levels in the structure. The shear wall width is eight feet, compared 
with girder spans of twenty-eight and eight feet, (the latter 
representing an average girder span of sixteen feet in the actual 
structure). To simulate the roller at the end of the frame girder, 
(remote from the wall), in the model, the present analysis introduces 
a ficticious column at the end of the frame girder, having a moment 

of inertia and plastic moment capacity equal to zero. The effects 

of axial shortening and the width of the columns were ignored. The 
stability functions, C and S, were assumed to be equal to four and 
two, respectively. Constant vertical loads were applied to the frame 
and the lateral loads were incremented proportionately. The resulting 
load-deflection curves are shown in FIGURE 5.2, where the concentrated 
lateral load at each floor level, H, is plotted as a function of the 
top story sway deflection, A. The results obtained from the present 
analysis and those reported by Ylynhoven coincide throughout the 
complete range of loading. 

In order to verify the behavior predicted for a frame con- 
taining diagonal bracing, the results of the present analysis were 
compared with those obtained by Galambos and Lay from a second order, 
elastic-plastic analysis, (18). The single story, three bay frame 
shown in the inset of FIGURE 5.3 was analyzed for the comparison. The 


member properties are given in Reference 18. The column bases are 
























bo need wnibootan ath HORPESR ox sepete wih 

| eo A 

‘oat berate Sh SHES 

) pert | der eerggh, et rte ‘weone 4 
AINE ond’ nt 219 

take TNE Tor Seite abv ipl Rie 
“wate hh Soeyey ete pntsneeey ‘ 

Fes ‘alll. Sop lbmhe aT 
m ath wh othe ot vert? otone 
Pr i Yo tee ath Se cme ani taiso 

‘nip. vi cen ea Mahan ihaeete tis ilove 

FQ oft Yo ue Bie Bee eebnevods (phxe WH 

soug ow 62 ate & enero ate 

“ri periy dha aphev ta oeqear eae 

“ai Siow sheet foveget oma 

ile: S18 aOVAUD nu feos tot | 

fave wold viupe Sa. beof Fare 

geared) ak .fottee ts veee Vine 

ott tue | en bation aaont bie @ 

re ea | | ‘ a a Ao. re 
monn Lia bvsing, 4 








‘5 


95 


pinned and concentrated axial loads, equal to 0.3 Pa are applied to 
each column top. The vertical loads are held constant while the hori- 
zontal load, H, is increased. The diagonal braces are assumed to 
transmit only axial tension. The results of first and second order 
analyses of the frame without bracing members, and a second order 
analysis of the frame with bracing members, are plotted in FIGURE 5.3. 
The applied horizontal force, H, non-dimensionalized by Pie the yield 
load of the column, is plotted against the horizontal displacement A, 
divided by the story height, L. The solid curves represent the 
results of Galambos and Lay; the dashed curves were obtained by the 
present analysis. The agreement in all three cases is excellent. 

The results of an analysis of a series of linked single story 
frames by Springfield and Adams, (28), were compared with those 
obtained by the present analysis. The three frames, shown in FIGURE 
5.4, represent a one story slice from the lower stories of a tal] 
office building, (28). Frame A is the main stiffening frame of the 
structure. Frame B is composed of frame A and an additional single 
bay rigid frame. Frame C represents the complete arrangement of 
vertical members in the story and consists of the main stiffening 
frame, the auxiliary rigid frame, and the remaining simply connected 
columns in the structure. The member properties and frame loads are 
given in TABLE 5.1. The total lateral load resisted by the frames, 

H, is plotted against the ratio of story sway 5 column height, A/h, 
in FIGURE 5.5. The results reported by Springfield and Adams, 
(represented by the solid curves), were obtained using the subassem- 


blage program described in Reference 27. The results obtained from 
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the present method are shown as the dashed curves. In the subassem- 
blage program the girder ninges are assumed to occur at the column 
faces, but the girder stiffnesses are based on the centre-to-centre 
column distances (27). The column width was included in the present 
analysis and the girder stiffnesses reduced to duplicate the assump- 
tion of the subassemblage program. The trends shown by botn analyses 
agree throughout the loading range. The present analysis, however, 
predicts slightly lower values of the ultimate lateral load, because 
of the influence of the column width on the bending moment distribu- 
tion in the girders. The present analysis based on the clear girder 
Spans, predicts greater values of negative moment at the face of the 
right hand columns than does the subassemblage program, which is based 
on the centre-to-centre column distances. Thus the right hand girder 
hinges in the present analysis develop prior to those in Springfield 


and Adam's analysis, and the predicted ultimate load is reduced. 


9.3 Frames Subjected to Vertical Loads Only 


Although considerable data is available on the behavior of 
multi-story frames subjected to combined lateral and gravity loads, 
published data on frames subjected to gravity loads only is extremely 
limited. Therefore it is impossible to completely verify each aspect 
of the present analysis as applied to structures subjected to vertical 
loads only. 

The elastic frame buckling loads predicted for a number of 
symmetrical one and two story, single bay frames were compared with 
the results reported by Galambos (29). The agreement was excellent 


in all cases. The inelastic frame buckling loads predicted for a 
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series of one story, one bay frames were compared with the results 
reported by Lu (30). Lu's computations were based on the rounded 
column moment-rotation relationships, which account for gradual 
yielding of the cross-section, while the present analysis is based on 
an elastic-plastic M-6 relationship. The agreement between the 
results of the two analyses was excellent in the high and low ranges 
of column slenderness, (where the frame buckling loads approach the 
elastic buckling loads and the sway mechamism loads respectively), 
but was less accurate in the intermediate range, where partial yield- 
ing of the column cross-section has a marked effect on the resistance 
of the frame to the buckling motion. The maximum error in this region 
was about 17%. | 

The only available data on the buckling capacity of frames, 
having elastic-plastic member moment-rotation relationships, is 
contained in the investigation by McNamee, (14). McNamee determined 
the frame buckling load by analyzing the structure subjected to 
vertical loads in combination with small lateral loads, as described 
in SECTION 2.3. The lateral load applied at each floor level is a 
fixed percentage, a, of the total gravity load applied at that level. 
The ultimate strength of the frame is determined for different values 
of a, and the frame buckling load extrapolated from the results. The 
three story, single bay frame, shown in FIGURE 5.6, was analyzed 
using the present method, neglecting the finite column widths and 
axial shortening. The section properties are listed in TABLE 5.2a. 
Uniformly distributed loads were applied in the present analysis. 
These loads produced fixed end girder moments equal to those pro- 


duced by the concentrated load, P, used in McNamee's analysis. 
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Vertical joint loads were also applied in the present analysis in 
order to adjust the column axial loads to their Original values. The 
results of analyses with a = 1/2% and 1% are shown in FIGURE 5.7a. 
One half of the vertical load applied at the first floor level, ey eS 
plotted as a function of A, the sway displacement at the first level. 
McNamee's analytical results are shown as the solid curves; those 
obtained by the present analysis as the dashed aes The trends 
shown by both analyses agree throughout the entire loading range. 
However, the present analysis predicts lower ultimate loads than does 
McNamee's, due to the differences in the bending moment diagrams 
produced by the two different loading systems. The uniformly dis- 
tributed loads in the present analysis produce a greater maximum 
positive bending moment in the girders than do the concentrated 

loads in McNamee's analysis. Thus the interior girder hinge, which 
is last to form in both cases, develops at a lower load factor in the 
present analysis, resulting in a lower predicted ultimate load. 

The results obtained from a test on a similar frame, per- 
formed at Lehigh University, are shown in FIGURE 5.7b. Curves 
obtained from the present analysis are also shown, both neglecting 
and considering the effect of the finite width of the columns. The 
ultimate loads obtained from the different analyses are presented in 
TABLE 5.2b. In FIGURE 5.7b, two unloading branches are plotted for 
the curve with a = 1/4% neglecting the finite width of the columns, 
one considering hinge reversal, and the other ignoring this effect. 
The hinging configuration for the structure at ultimate load is shown 


in the inset of the figure. As the sidesway motion increases (at the 
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ultimate load) the hinge at the left end of the middle girder reverses, 
and this region again behaves elastically. The result is an increase 
in the unloading strength of the structure. The slope of the unloading 
branch of the analysis considering hinge reversal agrees with tnat of 


the test curve. 
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MEMBER PROPERTIES 


4 WF 13 
d 4.145 
ee ovals 
iy 11.316 
Z. 6.265 
oF 50.3 
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TABLE 5.2a MEASURED MEMBER PROPERTIES - 


THREE STORY, SINGLE BAY FRAME 


FRAME BUCKLING RESULTS 


a McNAMEE 
0 24.2 
1/2% aay 
1% 21.4 
TEST VALUE 


PRESENT 
ANALYSIS 


2322 
Die 
20.8 
24.8 


PRESENT ANALYSIS INCLUDING 


COLUMN WIDTH EFFECT 


24.6 


TABLE 5.2b SUMMARY OF FRAME BUCKLING ANALYSES - 


THREE STORY, SINGLE BAY FRAME 
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LOAD-DEFLECTION RELATIONSHIP - FRAME SHEAR WALL STRUCTURE 
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LOAD-DEFLECTION RELATIONSHIP = LINKED SINGLE STORY FRAMES 
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FIGURE 5.7a 
LOAD-DEFLECTION RELATIONSHIP, THREE STORY SINGLE BY FRAME 
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PRESENT ANALYSIS, COLUMN WIDTH INCLUDED, @=0 






TEST CURVE 
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CHAPTER VI 
BEHAVIORAL STUDIES 


6.1 Introduction 

The primary objectives of this portion of the investigation 
are to compare the behavior of unbraced and braced frames, and to 
examine the design of columns in both types of structures. The 
twenty-four story, plastically designed frames described in Reference 
15, and the corresponding subassemblage frames, form the basic struc- 
tures studied in the investigation. The program of investigation is 
divided into two sections, the first dealing with the behavior of 
frames subjected to combined vertical and horizontal loads, and the 
second dealing with frame action under vertical loads alone. In both 
sections comparisons are made between the behavior of the unbraced 
and braced frames designed under the same conditions. In addition, 
results of first and second order analyses of the braced frames are 
presented, and the additional bracing required to increase the ulti- 
mate load capacities predicted by the second order analyses, to those 
resulting from the corresponding first order analyses, are determined. 

In addition to the basic studies described above, the 
relationship between bracing strength and stiffness and frame 
behavior is investigated, and a comparison made between the behavior 
of diagonally braced frames and those containing a K-bracing system. 


The effect of supporting a flexible frame by a stiffer braced or 
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unbraced frame, is also investigated. 


6.2 Basic Structures 
Ge2.1 Series A 

The two twenty-four story, three bay structures described in 
Reference 15, form the basis of the present investigation. The frame 
configuration and design loads are shown in FIGURE 6.1. The structure 
is a regular, rectangular frame with rigid connections and fixed column 
bases. The bent spacing is assumed to be 24 feet. The design vertical 
loads are based on a uniform live load of 100 psf and a deal load of 
120 psf, (30 psf and 95 psf respectively for the roof). The exterior 
wall cladding is assumed to produce a dead load of 85 psf, and the 
horizontal wind load is 20 psf. Live load reduction factors, as 
specified in Reference 31, are applied to the girders and columns 
separately. The resulting design girder loads are listed in TABLE 6.1, 
and the design column axial loads, based on tributary floor areas, 
are listed in TABLE 6.2. 

The unbraced frame, A-1, and the braced frame, A-2, are shown 
in FIGURES 6.2 and 6.3, respectively. Both frames were designed 
plastically on the basis of ultimate strength. Two loading conditions 
were considered: vertical loads alone, with a load factor of 1.70, 
and combined vertical and horizontal loads, with a load factor of 1.30. 
For the unbraced frame the P-A effect was accounted for using an esti- 
mated deflection index of 0.02 at ultimate load. For the braced frame 
the P-A effect was again included. For this case, the ultimate strength 


of the frame is assumed to coincide with brace yielding, corresponding 
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to a deflection index of 0.003. Although the secondary effects were 
computed under different assumptions for the two frames, the result- 


ing designs are consistent with current engineering practice. 


6.2.2 Series B 

The two subassemblage frames, frames B-1 and B-2, shown in 
FIGURES 6.4 and 6.5, represent horizontal slices from frames A-1 and 
A-2 respectively, at the sixth floor level. It is assumed that points 
of inflection occur at midheight of each column of the original 
frames. The behavior of the subassemblage frame is not necessarily 
indicative of the behavior of the corresponding twenty-four story 
frame, however, the results of the subassemblage studies will be com- 
pared with those obtained from analyses of the complete frames. 

The member properties for frame B-1, (the unbraced subassem- 
blage frame), are identical to those of the fifth and sixth stories 
of frame A-1. A fictitious girder, having a moment of inertia and 
plastic moment capacity equal to zero is inserted across the tops 
of the columns, so that the subassemblage can be analyzed using the 
computer program described in Chapter IV. The design loads are shown 
in FIGURE 6.4. The applied column axial loads are based on the area 
tributary to each column, with the appropriate live load reduction 
factor. The horizontal shear at the top of the subassemblage frame is 
equal to the total horizontal shear at the sixth level of frame A-2. 

The columns and girders of frame B-2, (the braced subassem- 
blage frame), are identical to those of the fifth and sixth stories 


of frame A-2. However, because of the artificial brace arrangement in 
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frame B-2, the diagonal bracing members are re-proportioned to produce 
the same stiffness (horizontal), critical axial load, and yield load 
in tension, as the corresponding members of frame A-2. The properties 
of the bracing members are given in FIGURE 6.5, along with the design 
loads on the frame. 

Frames B-3 and B-4, shown in FIGURE 6.6, are similar to frame 
B-2, but have the diagonal braces replaced by a K-bracing system. The 
bracing system of frame B-4 is inverted with respect to that of frame 
B-3. The members of the K-bracing system are proportioned to provide 
the same (horizontal) stiffness and capacities in compression and 
tension as the diagonal bracing system. A fictitious column having 
values of stiffness, area and plastic moment capacity equal to zero, 
“is inserted at midspan of the braced bay so that the computer analysis 
can be performed using the program described previously. 

Four additional frames, each representing a different 
structural framing system, are shown in FIGURES 6.7 and 6.8. Frame 
B-5 consists of the unbraced frame, frame B-1, coupled with a rigid 
frame designed to resist vertical loads only, (frame B-2 without the 
diagonal bracing members). Frame B-6 consists of the braced frame, 
frame B-2, coupled with the above rigid frame. Frame B-7 represents 
a framing system in which a select unbraced bent, frame B-1, is 
coupled with a number of bents whose column-girder connections are 
non-rigid. The supported frames are represented by a single column 
with an axial load, Pi> equal to the total vertical load on the non- 
rigid frames. Frame B-8 consists of the braced frame, frame B-2, 


coupled with such a series of frames. In all of the above cases, the 
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stiffer frame would be expected to resist most of the applied horizontal 


loads and P-A shears for the entire structure. 


6.3 Presentation of Results 
6.3.1 Combined Vertical and Lateral Loads 
6.3.1.1 Loading Procedure 

The procedure for the combined Joad studies was first to 
apply the factored vertical loads, (1.30 times the design values), and 
then to increment the lateral loads to trace the response of the 


Structure. The lateral load increment was 2% of the design load level. 


Ged..| Sccelwenty-Four Story Frames 


The first phase of the study compared the behavior of the 
unbraced, twenty-four story frame, frame A-1, and the corresponding 
braced frame, frame A-2. The load-deflection relationships for the 
two structures are shown in FIGURE 6.9, (solid curves), where the 
lateral load factor, A, is plotted as a function of the top story 
sway, A. Throughout most of the loading range the unbraced frame was 
stiffer than the braced frame. The unbraced frame reached an ultimate 
load factor of 1.90 at a sway of 30 inches; the braced frame reached a 
load factor of 1.50 at a sway of 17 inches. The hinging conditions in 
frames A-1 and A-2 at failure are shown in FIGURES 6.10 and 6.11 
respectively. The solid circles represent plastic hinge locations at 
failure; the open circles, locations where hinges originally formed 
under vertical load, but reversed when lateral load was applied to 
the structure. The numbers associated with the hinges indicate the 


stage on the load-deflection relationship, (FIGURE 6.9), at which 
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the hinges formed. A hinge designated "]" developed when the vertical 
load was applied to the structure. A hinge designated "2" formed 
between a load factor of zero and a load factor of 0.20, "3" between 
0.20 and 0.40, "4" between 0.40 and 0.60, "5" between 0.60 and 0.80, 
"6" between 0.80 and 1.00, "7" between 1.00 and 1.20, "8" between 
1.20 and 1.40, "9" between 1.40 and 1.60, "10" between 1.60 and 1.80, 
and "11" at a load factor greater than 1.80. Failure in the unbraced 
frame was initiated by extensive column hinging in the top stories; 
yielding of the tension braces in stories 7 to 13 inclusive initiated 
failure in the braced frame. (A11 the compression braces in frame 
A-2, except the one in the top story, had reached their critical axial 
loads at failure). The bracing members which had yielded or buckled 
at failure are indicated in FIGURE 6.11. 

The load-deflection relationships for frame A-2 with 110, 
120, 130, 140 and 150% bracing are also shown in FIGURE 6.9, (the 
dashed curves). The design bracing members, as given in FIGURE 6.3, 
represent 100% bracing. An increase in the amount of bracing indi- 
cates that the bracing stiffness, compressive capacity and tensile 
capacity have all been adjusted in the same ratio. The stiffness of 
the structure varied directly with the amount of bracing. However, 
the ultimate capacity of the frame increased only for percentages 
of bracing less than 140. Beyond 140%, the ultimate load capacity 
decreased with increased bracing capacity. The maximum lateral load 
factor obtained was 1.84. Failure of the frames with increased 
bracing occurred when the lower member in the leeward column stack 


reached its yield axial load. It was not possible to unload the 
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structure under this condition. 


6.3.1.3 Twenty-Four Story Frame - P-A Birecy 

The second phase of the study compared first and second 
order analyses of the braced, twenty-four story frame, frame A-2. 
The results of the analyses are shown in FIGURE 6.12, where the lateral 
load factor, X, is plotted as a function of the top story sway, A. 
The ultimate load factor for the frame, predicted by the first order 
analysis, was 2.36, as compared with 1.50 predicted by the second 
order analysis. Since the maximum load factor that could be achieved 
with additional bracing was 1.84, it was not possible to raise the 
Capacity predicted by the second order analysis to that predicted by 


the first order analysis by simply adding bracing to the frame. 


6.3.1.4 Subassemblage Frames 
The third phase of the study compared the behavior of the 


unbraced and braced subassemblage frames, frames B-1 and B-2. Results 
of the analyses are shown in FIGURE 6.13, where the lateral load 
factor, A, is plotted as a function of the story Sway rotation, p, 
(defined as the story sway deflection divided by the story height). 
The sequences of plastic hinge formation in the two frames are shown 
in, FIGURES 6.14 and 6.15. The solid circles represent the hinge 
locations; the numbers correspond to the stages on the load-deflection 
curves, (FIGURE 6.13), at which the hinges formed. Plastic hinges 

did not develop under gravity loads alone in either structure, and, 
therefore, no hinge reversal was observed. 


The unbraced frame, frame B-1, exhibited increased Sway 
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deflections after the formation of plastic hinges in the leeward ends 
of all three girders. The ultimate load factor of 2.02 was achieved 
at a rotation of 0.0085 radians, after two additional girder hinges 
had developed. The final girder hinge formed on the descending 
portion of the load-deflection curve. 

The braced frame, frame B-2, was slightly stiffer than the 
unbraced frame in the initial stages of loading. Plastic hinges 
developed first at the leeward ends of the centre and left girders. 
However, the stiffness of the frame was not reduced Significantly 
until the two compression braces buckled, at a load factor of 0.48. 
Beyond this point the load carrying capacity of the braced frame was 
less than that of the unbraced frame at a given sway rotation. The 
ultimate lateral load factor for the braced frame, 1.92, which was 
achieved at a rotation of 0.0067 radians, corresponded to yielding 
of tne tension braces. 

Also shown in FIGURE 6.13 are the load-deflection relation- 
ships for frame B-2 with various percentages of bracing, (dashed 
curves). The stiffness and load carrying capacity varied directly 
with the amount of bracing over the range investigated, 90, 105, 110 
and 120% bracing. The braced frame with 105% bracing reached an 


ultimate load factor of 2.02, the same as that of the unbraced frame. 


6.3.1.5 Subassemblage Frame - P-A Effect 


The fourth phase of the study compared the results of the 
first and second order analyses of the braced subassemblage frame, 
frame B-2. The results of the analyses are shown in FIGURE 6.16, where 


tne lateral load factor, 4, is plotted as a function of the story sway 
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rotation, p. In the first order analysis the tension braces yielded 
at a load factor of 2.40; the ultimate load factor for the frame was 
2.66. The ultimate load factor as predicted by the second order 
analysis was 1.92. Two dashed curves, representing second order 
analyses of the frame with 123% and 136% bracing, are also shown. 

The structure with 123% bracing reached a maximum load factor of 2.405 
the same as that predicted by the first order analysis for yielding 
of the tension braces; the structure with 136% bracing reached a 
maximum load factor of 2.66, the same as that predicted by the first 


order analysis. 


6.3.1.6 Subassemblage Frame - Bracing Strength and Stiffness 


The fifth phase of the study was concerned with the relative 
effect of varying the bracing strength and stiffness independently. 
Frame B-2 was analyzed with the bracing stiffness increased 36%; with 
the bracing strength increased 36%; and with both stiffness and 
strength increased by 36%. The load-deflection curves are shown in 
FIGURE 6.17. The response of the original braced frame is shown for 
comparison. 

Increasing the bracing stiffness without increasing its 
strength had little effect on the ultimate strength of the frame. 
Conversely, increasing the bracing strength without increasing its 
extensional stiffness, although increasing the ultimate load factor, 
had little effect on the stiffness of the frame. It was necessary 
to increase both stiffness and strength to achieve a significant 
increase in the ultimate load capacity of the frame, at the sway 


rotation corresponding to the ultimate strength of the original frame. 
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6.3.1.7 Subassemblage Frame - Bracing Systems 

The sixth phase of the study compared the behavior of the 
frame containing a diagonal bracing system, with those containing 
equivalent K-bracing, designed as outlined in SECTION 6.2.2. The 
results of the analyses are shown in FIGURE 6.18. The behavior of 
frame B-2 is represented by the solid curve, the relationships for 
frames B-3 and B-4 by the dashed curves. The frames are shown 
schematically in the insets to the figure. 

The compression braces in the K-bracing system of frame B-3 
buckled at a load factor of 1.04, and the tension braces yielded at 
a load factor of 2.18, corresponding to the attainment of the ulti- 
mate load. Thus frame B-3 was able to achieve a slightly higher 
ultimate load than frame B-2. 

Howeyer, the K-bracing arrangement used for frame B-4 was 
vastly inferior to both that used for frame B-3 and the diagonal system 
of frame B-2. In frame B-4 the bracing members buckled in compression 
on the application of the vertical loads to the frame. A sway rota- 
tion of 0.0011 radians was necessary before the eventual tension 
braces recovered the deformations associated with the buckling motion. 
Extensive girder hinging developed at low loads due to the large sway 
rotations. The ultimate load factor for the frame, 0.78, was achieved 
Without yielding the tension braces. 

An additional analysis was performed on frame B-4 after 
adjusting the critical axial loads of the bracing members so that 


buckling did not occur on the application of the initial vertical loads. 
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The results of the analysis are shown in FIGURE 6.18. The improvement 


in the load capacity of the frame was not substantial. 


6.3.1.8 Coupled Subassemblage Frames 


In the seventh phase of the study, the behavior of a number 
of coupled frame arrangements was investigated. In the first series, 
the unbraced subassemblage frame was used as the principal stiffening 
element. The results of the analyses are shown in FIGURE 6.19. The 
solid curves represent the behavior of the unbraced frame, (frame B-1), 
the unbraced frame coupled with a frame designed to resist vertical 
loads only, (frame B-5), and the unbraced frame coupled with a single 
pinned column, (frame B-7). The pinned column is used, in turn, to 
represent a single non-rigid frame with vertical loads equal to those 
of the unbraced frame, (P, = 6030 kips), two such non-rigid frames, 
(P, = 12060 kips), and three such non-rigid frames, (P, = 18090 kips). 
The ultimate load factor for frame B-1 was 2.02. Frame B-5 reached an 
ultimate load factor of 1.84, representing a 9% reduction in the load 
carrying capacity. Frame B-7, with Py equal to 6030 kips, reached a 
load factor of 1.62, (a 20% reduction); with P, equal to 12060 kips, 
1.30, (a 36% reduction); and with P, equal to 18090 kips, 1.00, (a 
50% reduction). 

The p/P, ratios of the columns, under a vertical load factor 
of 1.30, were approximately 0.56 in the unbraced frame and 0.62 in the 
frame designed for vertical loads only. These values correspond to 
axial load ratios of 0.74 and 0.81 under a vertical load factor of 
1.70, and, thus, might be typical of the lower stories of multi-story 


frames. The dashed curves shown in FIGURE 6.19 represent analyses of 
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frames B-1] and B-5 with the applied column axial loads reduced to one- 
half of their original values (P/P ratios equal to 0.28 and 0.31, 
respectively). Such axial loads might be typical of columns near the 
top of multi-story frames. Frame B-1] with half the applied column 
axial loads, reached an ultimate load factor of 2.32, an increase of 
15% above the load factor of the original frame. Frame B-5, with half 
the applied column axial loads, reached a load factor of 2.36, an 
increase of 28% above that of the original unbraced-supported frame. 
The ultimate load factor for frame B-5, (with Bay = 0.28), was greater 
than that of frame B-1, indicating that under these conditions the 
supported portion of frame B-5 was, indeed, capable of resisting 
applied lateral loads in addition to its own P-A shears. 

In the second series, the braced subassemblage frame was used 
as the principal stiffening element. Results of the analyses are 
shown in FIGURE 6.20. The behavior of frames B-2, (the braced frame), 
B-6, (the braced-supported frame), and B-8 (the braced-pinned column 
frame), are represented by the solid curves. The ultimate load factor 
for the braced frame was 1.92. Frame B-6 reached an ultimate load 
factor of 1.72, representing a reduction from the load carrying 
capacity of frame B-2, of 10%. Frame B-8, with Py equal to 6030 kips, 
12060 kips and 18090 kips, reached load factors of 1.46, 0.98 and 0.52, 
respectively, (corresponding to reductions of 24, 49 and 73%). The 
dashed curves in FIGURE 6.20 represent the responses of frames B-2 
and B-6 with the p/P. ratios of the columns approximately equal to 0.31. 
Frame B-2, under one-half of the original applied column axial loads, 


reached an ultimate load factor of 2.16, an increase of 12% above the 
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load factor of the original frame. Frame B-6, with half the applied 
column axial loads, reached a load factor of 2.20, an increase of 28% 
above that of the original braced-supported frame. The load factor 
reached by frame B-6 in this situation was greater than that of the 


braced frame along. 


6.3.2 Vertical Loads Only 
6.3.2.1 Loading Procedure 


In the case of a frame subjected to vertical loads only, the 
vertical loads were incremented proportionately from zero to failure. 


Each load increment was 2% of the corresponding design value. 


6.3.2.2 Twenty-Four Story Frames 


The eight phase of the study was concerned with the response 
of frames A-1 and A-2 to increasing vertical loads, and in particular, 
with the amount of bracing required to prevent frame buckling of frame 
A-2 until the beam-mechanism load was reached. However, in frame A-2 
many of the bracing members in the middle stories buckled in compres- 
sion between load factors of 0.92 and 1.40, due to axial shortening of 
the columns. When the braces in a particular story were both in a 
buckled condition, they were unable to provide any net component of 
horizontal force to resist the P-A shears in the structure. Thus ata 
load factor of 1.42, the lateral stiffness of the structure, in the 
absence of any contribution from the buckled compression braces, was 
reduced so that the determinant of the coefficient matrix became 
negative, and the structure was unloaded. In actual fact, the frame 
was capable of resisting additional vertical load, because, as the 


sidesway motion increased, one of each pair of buckled compression 
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braces would return to the elastic range, and provide additional 
lateral stiffness to the structure. To eliminate this complexity, 
the bracing members were prevented from initial buckling, by neglect- 
ing axial shortening of the columns in the analysis. 

The unbraced frame, frame A-1, reached a load factor of 1.66 
before the frame became unstable. The hinging pattern in the frame at 
this stage is shown in FIGURE 6.21. Hinging is concentrated in the 
top six stories. The girders did not reach the mechanism condition, 
although the load factor attained, 1.66, was close to that used in 
design, 1.70. When axial shortening was considered, the unbraced 
frame reached a load factor of 1.70 before the frame became unstable. 

The braced frame, frame A-2, reached its beam mechanism load 
without any indication of overall frame instability. The beam 
mecnanism load factor was 1.68. The hinging pattern in the structure 
at this stage is shown in FIGURE 6.22. Hinging was extensive through- 
out the structure, but the bracing members remained elastic. To check 
the effect of column axial shortening on the frame instability load, 
the braced frame was analyzed with 0.1% of the girder loads applied in 
the horizontal direction at each floor level. The results agreed with 
the case where axial shortening was not considered. 

In order to determine the amount of bracing necessary to 
prevent overall frame instability, the braced frame was re-analyzed 
without bracing members. Frame instability occurred at a load factor 
of 1.40, however 1% bracing was sufficient to enable the frame to reach 
its beam mechanism load. These results were obtained for the case 


where column axial shortening was not considered, and therefore sways 
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under vertical loads were small. 


6.3.2.3 Subassemblage Frames 


The ninth phase of the study was concerned with the behavior 
of the subassemblage frames under vertical loads only. The results 
of the investigation are shown in FIGURE 6.23, where the vertical load 
factor, 4, is plotted versus the story sway, A. The sequences of 
plastic hinge formation in frames B-1 and B-2 are shown in FIGURES 6.24 
and 6.25, respectively. The numbers associated with the hinges indi- 
cate the stages on the load deflection diagrams where the hinges 
developed. The first hinge to form in the unbraced frame developed 
at a load factor of 1.84. Subsequently, the sway deformations increased 
under increasing vertical load, as did the number of hinges. The 
ultimate load factor for the frame was 2.06, at a sway deflection of 
0.35 inches. The hinge which formed at stage 3, at the left end of 
the right hand girder, began to close at stage 6 as the frame buckled 
Sideways. The first hinge to form in the braced frame developed at 
a load factor of 1.32. The ultimate load factor for the frame was 1.74, 
corresponding to the formation of a beam mechanism in the left hand 
girder. The diagonal bracing members in the subassemblage frame 
remained elastic, as the sixth level was below the portion of the 
structure where the braces buckled due to axial shortening of the 
columns. Frame B-2 exhibited only small sways under the vertical loads. 

As in the prior phase of the study, the behavior of the 
braced frame without bracing members was also investigated. The load- 
deflection curve for the frame is shown in FIGURE 6.26. The load 


factor corresponding to frame instability was 1.36. The minimum 
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bracing, which would prevent frame instability until after the beam- 
mechanism load had been attained, was 18% of the original design 
bracing. 

The results of the present analysis, which applied only 
vertical loads to the frame, were compared dja See obtained using 
the small-lateral-load approach (14). Dashed curves, representing the 
responses of the braced frame, without bracing members and with 18% 
bracing, are shown for a equal to 1/2 and 1%, (where ao is the fraction 
of the total vertical load on the frame, applied in the horizontal 
direction). The results of the small-lateral-load analysis approached 
those of the present analysis as a approached zero. 

In order to investigate the consequences of the buckling of 
the bracing members due to axial shortening, the subassemblage frame 
was re-analyzed with the compressive capacity of the braces reduced. 
The results of the analysis are shown in FIGURE 6.27, where the 
vertical load factor is plotted versus an expanded sway deflection 
scale. The relationship for the braced frame without bracing is shown 
for comparison. The sequence of formation of plastic hinges in the 
braced frame is shown in FIGURE 6.28. The numbers associated with 
the hinges correspond to the stages on the load-deflection diagram 
where the hinges developed. At stages 1, 2, 3 and 4 respectively, the 
diagonal bracing members reached their critical axial loads in com- 
pression. Between stages 4 and 5, the response of the braced frame 
corresponded to that of the braced frame without bracing, since the 
bracing in the buckled state was unable to provide any lateral stiff- 


ness to the structure. At stage 5, one of the braces in each story 
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returned to the elastic range, and the frame was able to resist addi- 
tional load. The ultimate load corresponded to the beam-mechanism 
load for the structure. 

Thus in the case where the bracing members buckle due to 
axial shortening of the columns, the frame instability load is not 
necessarily impaired. In the twenty-four story frame the small lateral 
load approach verified that the beam mechanism load could still be 
reached. The lateral loads can be thought of as the equivalent story 
P-A shears that result from alignment imperfections. A value of .001 
times the total applied vertical load in a given story corresponds to 
an erection tolerance of .001 in the columns. In the subassemblage 
frame it was found that the sway motion increased rapidly enough to 
return the braces to the elastic range before the frame instability 
load was reached. Under additional vertical load the frame remained 


stable, and the beam mechanism load was achieved. 


6.4 Summary 


In this chapter the general outline of the behavioral studies 
has been presented. The basic structures to be investigated were 
described in detail, and the results of each phase of the study were 
presented. The behavioral studies are discussed in the next chapter, 


as are the resulting design implications. 
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FIGURE 6.10 


FRAME A-1 - HINGING CONDITION AT FAILURE 
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FIGURE 6.11 
FRAME A-2 - HINGING CONDITION AT FAILURE 
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FIGURE 6.21 
FRAME A-1 HINGING CONDITION AT FAILURE 








FIGURE 6.22 


FRAME B-2 SEQUENCE OF PLASTIC HINGE FORMATION 
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CHAPTER VII 
DISCUSSION OF RESULTS AND DESIGN RECOMMENDATIONS 


7.1 Introduction 

The behavioral studies described in the previous chapter were 
performed to study the response of a number of frames to applied loads, 
and to develop rational design procedures for the girders, columns and 
bracing systems. In the following section the results of these studies 
are discussed, and the behavior of each subassemblage frame is compared 
with that of the corresponding twenty-four story frame. In the final 
section of the chapter, the implications of the results on current 


design practices are discussed, and recommendations are made for design. 


7.2 Discussion of the Results of the Behavioral Studies 
7.2.1 Combined Vertical and Lateral Loads 

A comparison of the behavior of the unbraced twenty-four 
Story frame and the corresponding braced frame, subjected to combined 
vertical and lateral loads, indicates that the unbraced frame reached 
a higher ultimate load factor than the braced frame, and that the 
deformation at ultimate load was greater. The ultimate load factor 
for both frames exceeded the design value of 1.30 by a considerable 
margin. Of greater significance, however, is the fact that the braced 
frame deflected more than the unbraced frame at all loads up to the 
factored design load. Thus the P-A effects were more significant for 
the braced frame than for the unbraced frame. 

The unbraced and braced subassemblage frames exhibited the 


same characteristics as the twenty-four story frames. Both subassemblage 
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frames reached a higher ultimate load factor than the corresponding 
twenty-four story frames, due to the fact that the sixth level did 
not participate in the failure mechanism in either of the twenty-four 
story structures. The difference in stiffness between the braced and 
unbraced frames (the unbraced frame was stiffer) was more pronounced 
for the subassemblage frames. 

The comparison between the first and second order analyses 
of the braced twenty-four story frame, showed that the ultimate load 
factor was reduced 36% by the P-A effects; the corresponding reduc- 
tion for the braced subassemblage frame was 28%. In the latter frame 
an additional 23% bracing was required to achieve the first order load 
factor at the yield of the tension braces, and an additional 36% to 
achieve the first order load factor at ultimate load. 

A study of the relative magnitudes of the PsA Gitects ated 
series of linked frames was performed using the unbraced and braced 
subassemblage frames alternately as the principal lateral stiffening 
element. Where the unbraced bent was coupled with the supported bent, 
tne iene load factor for the frame was reduced 9% below that of 
the unbraced bent alone. The corresponding reduction for the braced 
bent coupled with the supported bent, was 10%. Where the unbraced 
and braced bents were coupled with a single column, used to represent 
a given number of non-rigid bents, the reductions in the ultimate load 
factors were more severe. When the column carried an axial load equal 
to that of the unbraced or braced bent, the reductions were 20% for 
the unbraced bent and 24% for the braced bent. With twice the axial 


load applied to the column, the reductions were 36% and 49%; and with 
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three times the axial load, 50% and 73%. Thus in all cases the P-A 
effects for the coupled braced frames were greater than those for 


the corresponding unbraced frames. 


7x2.2 Vertical Loads Only 

In the study of the behavior of the braced twenty-four story 
frame subjected to vertical loads only, it was found that a minimal 
amount of bracing was necessary to prevent frame instability before 
the beam mechanism load for the structure was attained. The results 
were substantiated by the study of the braced subassemblage frame. 
In the twenty-four story frame many of the bracing members buckled 
prior to the attainment of the factored design vertical load. However, 
the small-lateral-load approach confirmed that the bracing members were 
capable of returning to the elastic range on the buckling motion, with- 
out adversely affecting the frame instability load. In the study of 
the braced subassemblage frame, the small-lateral-load approach was 


shown to give a lower bound solution to the frame instability load. 


7.3 Design Recommendations 
7.3.1 Interaction Equations 

As discussed in CHAPTER I, the columns in a multi-story frame 
are commonly designed on the basis of interaction equations, based on 
the ultimate strength of the member. Each column must be checked 
against local overstressing, (EQUATION 7.1), and overall instability, 
(EQUATION 7.2). The form of Equations 7.] and 7.2 is that used in 


allowable stress design: 
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a b 
where f_ = axial stress, 


f = bending stress, 
F_ = allowable axial stress in the absence of bending, 
FY = allowable bending stress, 


F = yield stress of the steel, 





ry, 
Ch = coefficient used to determine the equivalent uniform 

bending moment, 

: 1 1 _ 149,000 

ha saree are where aA ae oe and 

ea ry? 

ae 

= effective slenderness ratio in the plane of bending 


The amplification factor, a, modifies the bending stress to account for 
the secondary (Pé) moments caused by the deflection of the column from 
its chord, as shown in FIGURE 1.2. The effective length factor, K, 

and the equivalent moment factor, Cw are used to modify both the 

axial and bending stresses, to account for the P-A moments produced by 
the sway deflection of the column. The P-A moments are assumed to be 


accounted for by using the effectiye length factor for a column 
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permitted to sway, (K > 1), and are neglected when the effective length 


factor for a column prevented from sway is used, (K < 1). 


Common design practice is to consider the columns in unbraced 
bents as permitted to sway, and those in braced or Supported bents as 
prevented from sway. However, the results of the behavioral studies in 
the last chapter indicated that the braced frames swayed more than the 
corresponding unbraced frames at the same load level. In addition, 
the comparisons of the first and second order analyses of the braced 
frames showed that the ultimate load capacities were appreciably 
reduced by the P-A effects. The study of the coupled frames, indeed, 
showed that the braced bent was more susceptible to a reduction in its 
load carrying capacity due to P-A effects, than was the unbraced bent. 
Thus a braced or supported bent cannot be considered "prevented from 
- Sway". 

The important concept is not whether one considers a frame 
as "prevented from sway" or "permitted to sway", but, rather, the way 
in which the designer accounts for the P-A effects. It follows that 
if a structure is to be designed using moments and forces from a first 
order analysis, in combination with the interaction equations, then the 
effective length must be computed by assuming the frame free to trans- 
late, since the sway forces have not been accounted for. On the other 
hand, if the structure is analyzed under the action of the applied 
loads and the sway forces, the sway forces have been included in the 
basic analysis, and need not be considered a second time. Under these 
conditions, the interaction equations are used to compensate for the 


neglect of the secondary moments in the columns, (Ps), and the 
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effective lengths are computed assuming that translation is prevented. 
Thus the choice of the nomograph to use in computing the effective 
length factor does not depend on whether the structure does or does 
not contain a bracing system or shear wall, but rather whether the 
sway forces are to be accounted for in the basic analysis procedure 
or within the interaction equations. 

If it is desired to resist all the lateral forces in a 
particular portion of the structure, such as shear wall or vertical 
truss, this portion must be designed for the sway forces as well as 
the applied lateral loads. The effective length factors for the 
columns may then be computed assuming translation is prevented. 

If the bracing is designed to resist lateral loads only, 
without consideration of the sway forces, no guarantee exists that 
the system is capable of resisting the sway forces, and therefore, in 
computing the effective Jength factors for the columns in the struc- 
ture, the conservative assumption would be that the columns were per- 
mitted to sway. 

The moments and forces from a first order analysis are also 
used in the strength interaction equation for combined axial load and 
bending, EQUATION 7.1. No provision is made for the P-A effects. 
Thus the actual factor of safety against local overstressing obtained 
using EQUATION 7.1] is dependent on the relative magnitude of the P-A 
moments and forces. To produce a uniform factor of safety against 
local overstressing, the axial and bending stresses must be based on 


a second order analysis. 
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When the moments and forces from a first order analysis are 
used in conjunction with the interaction equations, only the columns 
are designed for the P-A effects. In most practical cases the strength 
of the girders controls the strength of the frame. Thus the use of 
the interaction equations does not generally account for the influence 
of the P-A effects on the ultimate strength of the frame. For the 
mibraced subassemblage frame, based on the moment capacity of the 
columns, the interaction equations predict a story shear capacity of 
439 kips including the P-A effects, and a capacity of 667 kips neglect- 
ing the P-A effects, (lateral load factors of 4.05 and 6.15 respect>. 
ively). The actual second order load factor was 2.02. Girder hinging 
controlled the strength of the frame. The columns were stressed to 


only half their design capacity at failure. 


7.3.2 Computation of Sway Forces 


The computation of sway forces is relatively simple. In the 
combined load case the lateral and vertical loads are applied to the 
structure and the lateral displacement at each floor level is com- 
puted using a first order analysis. These displacements are denoted 
as A. in Figure 7.1, where i refers to the floor level. The additional 


story shears due to vertical loads are computed: 


where AV. = additional shear in story i due to the sway forces, 
zP. = sum of the column axial loads in story i, 
h. = height of story i, and 
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Ae 4d = displacements of levels i+1 and i, respectively. 
The sway forces due to the yertical loads, AF., are then computed as 


the difference between the additional story shears at each level: 


Aiea Nes hae (7.4) 


The sway forces, AF. are added to the applied lateral loads, and the 
Structure re-analyzed. When the A. values at the end of a cycle are 
nearly equal to those of the previous cycle, the method has converged, 
and the resulting moments and forces are, in fact, second order. 

The method described above is equally applicable to the 
vertical load only case. The deflected shape under the applied 
vertical loads is determined and the sway forces calculated using 
EQUATIONS 7.3 and 7.4. The sway forces are then applied to the 
structure and the deflected shape again determined. After only a few 
cycles it should be evident whether or not the method is converging. 

If the story deflections do not converge the frame is unstable. 

The above method of computing sway forces is illustrated 
for the braced subassemblage frame in FIGURE 7.2. The first and second 
order load deflection curves for the frame subjected to 1.30 times the 
design vertical loads are shown although normally the frame would be 
analyzed at } = 1.00. The first line in the table under the figure 
indicates the first order deflection for the frame. The sway forces 
are computed and added to the lateral loads to begin the second cycle. 
The method converges to the second order deflection in three cycles. 
Comparison with the second order load-deflection curve for the structure 


shows this sway to be correct. 
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The sway due to the P-A shears was 34% of the sway due to 
the applied loads alone. At the end of the first cycle in the iterative 
process 78% of the P-A sway had been accounted for. 

An interesting feature of the method is that the relative 
magnitudes of the applied lateral loads and sway forces are known. 
Thus, if bracing strength controlled the original first order design, 
the increase in the amount of bracing to provide the same factor of 
Safety against yielding of the bracing including the P-A effects 
should be equal to the ratio of the sway forces to the applied lateral 
loads. This was indeed the case for the subassemblage frame, as, in 
the behavioral studies, 23% additional bracing was found necessary to 
raise the second order load factor at the yield of the bracing members 


to the first order level. 


7.3.3 Proposed Design Method 


The following procedure is recommended for the design of 
multi-story steel frames, regardless of whether or not the frame con- 
tains a vertical truss or shear wall: 

1. Proportion the columns, girder and bracing members, if any, 
on the basis of a first order analysis for vertical loads 
only, at a load factor of 1.70; and for combined vertical 
and lateral loads, at a load factor of 1.30. Use effective 
length factors for the columns assuming translation is 
prevented, (K < 1). 

2. Perform a second order analysis under vertical loads only, 


and modify the frame members if necessary. 
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3. Perform a second order analysis under combined vertical 
and horizontal loads, and modify the frame members if 
necessary. 
If the bent in question is required to support a number of additional 
bents, it must be designed for the total P-a effects from the coupled 
frames in steps 2 and 3. 
The principal advantage of such a design procedure is that 
jt requires a rational assessment of the P-A effects in a given 
structure. Design economies may result in frames where the P-A effects 
are negligible, but, more important, unsafe designs due to neglect of 


the P-A effects, (especially from supported bents), will be avoided. 
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CHAPTER VILI 
SUMMARY AND CONCLUSIONS 


8.1 Summary 

The first four chapters of the dissertation describe the 
formulation of a computer program to analyze multi-story steel frames 
with provision for diagonal bracing members and shear wall elements. 
The member response is assumed to be elastic-perfectly plastic. . The 
influence of axial load on the stiffness and carry-over factors is 
considered for the columns, but neglected for the girders. The 
effects of finite column width and hinge reversal on the behavior of 
the girders are also considered. Diagonal bracing members are assumed 
to be subjected to axial loads only. The frame analysis is second 
order, that is to say, the story shear equilibrium is formulated on 
the deformed structure. Axial shortening of the columns is considered. 
The equilibrium equations are solved by a modified Gauss elimination 
procedure. 

In the fifth chapter, a number of comparative studies are 
described, which are used to verify the present method of analysis. 

The sixth and seventh chapters are concerned with the 
behavior of a number of frames subjected to vertical loads alone, 
and to combined vertical and lateral loads. Comparisons are made 
between the behavior of unbraced and braced frames, with particular 
emphasis on the P-A effects. Coupled unbraced-supported and braced- 
supported frames are also considered. A design procedure, based on 


the behavioral studies is recommended for multi-story frames. The 
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method results in a more uniform factor of safety than does present 


design practice. 


8.2 Conclusions 

The behavioral studies of the plastically designed Lehigh 
frames, (15), resulted in two major conclusions, which led to the 
proposed design procedure. The first was that the braced frames 
swayed more than the corresponding unbraced frames at a given load 
factor. Thus the amount of relative story deflection necessary to 
develop the resisting forces in the bracing members was greater than 
that for the unbraced columns and girders. The extensional stiff- 
ness of the bracing members is therefore an important design 
consideration. 

The second conclusion was that the P-A effects significantly 
reduced the load carrying capacity of the braced frames, especially 
in the situation where the braced bents were required to provide 
additional lateral stiffness for a number of supported bents. The 
braced frames were more susceptible to a reduction in the load carry- 
ing capacity than were the corresponding unbraced frames. Thus the 
P-a effects are an important design consideration for braced frames, 
as well as for unbraced frames. 

Based on these findings, a design procedure was recommended 
which makes no distinction between so-called "braced" or "“unbraced" 
structures. The P-A effects are included in the basic analysis, and 
the designer is therefore justified in using an effective length 
factor less than one in the interaction equations. The method pro- 


vides a uniform factor of safety for structures with varying P-A 
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effects, and does not necessitate the artificial distinction between 
frames which derive their lateral stiffness through the flexural 
action of their columns and girders only, and those which have a 
vertical truss or shear wall system. 

In addition a number of conclusions regarding the basic 
behavior of structures arose from the studies of the braced frames. 
In the combined load case, the rotation capacity of the twenty-four 
Story braced frame was terminated when the leeward column in the 
bottom story reached its yield load in compression. Thus the 
increased axial load in the leeward column stack due to the accumu- 
lative effects of the vertical components of force from the bracing 
members is an important design consideration. 

Equally important in the vertical loads only case, is the 
critical axial load of the bracing members. If the bracing members 
are permitted to buckle due to axial shortening of the columns, they 
are ineffective in ceeeeaene a sidesway motion of the structure until 
they return to the elastic range. In this case the designer has three 
alternatives: 

1. Design the frame to resist the buckling motion under factored 
gravity loads without the aid of the bracing members. 

2. Calculate the sway necessary to return the bracing members 
to the elastic range, and determine if the structure ts 
stable in this deflected position. 

3. Design the bracing members to remain elastic under the 


influence of axial shortening. 
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Alternative 1 is probably uneconomical, and 2 is difficult to assess. 
Alternative 3 is therefore recommended to ensure adequate structural 
stiffness. 

The type of bracing system chosen influences the behavior of 
the structure. The K-bracing system has the advantage of supporting 
the girders at midspan, and therefore permits the use of lighter girder 
sections. However, when one of the bracing members buckles as the 
load on the frame is increased, the girder must be capable of resisting 
the difference between the vertical components of force in the braces. 
If the girder is too flexible, the effectiveness of the brace will be 
reduced. In addition, if the bracing members are used in a configura- 
tion in which the gravity loads on the girders subjects them to com- 
pression, the stiffness of the frame may be drastically reduced if the 
braces are not both designed to remain elastic for a considerable 


portion of the loading history. 
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APPENDIX A 
COMPUTER PROGRAM 


THE AUTHORS AND THE UNIVERSITY OF ALBERTA DISCLAIM 
RESPONSIBILITY FOR THE MISUSE OF THE FOLLOWING PROGRAM, 
NOR WILL THEY BE RESPONSIBLE FOR ERRORS IN THE LISTING. 
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A.1 Nomenclature for Computer Program 


A 
AB 
AC 
AG 
B 


CAI ,CA2 ,CA3,CA5, CAG, 
Peete ecb, 5,CB6 


ee CCK CCY 


cc2 
CDI ,CD2 ,CD3,CD4,CD5 


SRP Cha ,€U3 CL 
GapecliZ.CU3,CU5 


Cia ,C9 C10 


DEL 
DELC 
DELD 
DET 
DLDES 


FB 


- 


coefficient matrix of equilibrium equations 
brace area (in?) 
column area (in?) 
girder area (in?) 


load vector of equilibrium equations 


- coefficients of girder slope-deflection equations 


column stability function (x and y refer to the 
column segments if an interior column hinge 
exists) 

column axial stiffness (KSI) 


coefficients of brace load-deformation equations 
coefficients of column slope-deflection equations 


dummy variables used in connection with the 
slope-deflection equations 

vertical displacement of a joint (in) 
deflection at an interior girder hinge (in) 
deflection at an interior column hinge (in) 
determinant of the coefficient matrix 
design dead load (KLF) 

brace modulus of elasticity (KSI) 

column modulus of elasticity (KSI) 

girder modulus of elasticity (KSI) 

applied lateral load (K) | 


axial force in brace (K) 
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FBP - plastic capacity of brace (K) 

FBX - horizontal component of force in brace (K) 
FDES - design lateral load (K) 

FYB - brace yield stress (KSI) 

FYC - column yield stress (KSI) 

FYG - girder yield stress (KSI) 

H ~ story heignt (column height) (in) 

IAREA - indicator for neglecting axial shortening 
IELAST - indicator for elastic analysis 

IL - indicator for load increment 

IND - indicator of new hinges formed 

IND2 - indicator of hinge at column base 

IND3 - indicator of negative determinant 

IND6 - indicator for print control 

IREV - indicator of hinge reversal 

IREV2 - indicator for ignoring hinge reversal 
ISTAB - indicator for neglecting stability functions 
IXC - column moment of inertia (in’) 

IXG - girder moment of inertia (in*) 

110 - indicator for ignoring hinge reversal 

11] - maximum number of hinges at failure 

112 - indicator for neglecting P-A effects 

JB - brace hinge condition 

JBL - brace hinge condition at beginning of load 


increment 


JC - column hinge condition 
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JCL 


JG 
JGL 


LG 

LLDES 

LLL 

MA MB ,MC 

MABP ,MBAP ,MCAP ,MCBP 
MFAB ,MFBA ,MFCA ,MFCB 
MAX ,MBY 

ML ,MU ,MD 

MLUP ,MULP ,MDLP ,MDUP 
MM 

MMM 

NA 

NB 

NCYC 

NL 

NLAST 

NN 
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column hinge condition at beginning of load 
increment 

girder hinge condition 

girder hinge condition at beginning of load 
increment 

column base spring constant (KSI) 

bay width (in) 

brace length (in) 

girder length (in) 

design live load (KLF) 

indicator of column axial loads 

girder moments at A, B and C (in-k) 

girder plastic moment capacity (in-k) 
girder fixed end moments (in-k) 

moments due to applied girder loads (in-k) 
column moments at L, U and D (in-k) 

column plastic moment capacity (in-k) 
number of column stacks 

MM-1 

total number of unknown deformations 
matrix half band width 

number of permissible cycles of iteration 
number of load increments 

number of last load increment 

number of floor levels 

NN-1 


column axial load (k) 
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PAPP 
PCR 
PDES 
RABP , RBAP , RCAP 


RABPL ,RBAPL , RCAPL 


RLUP, RULP , RDLP 


RINLL ,RINF,RINP,RINV 


REE RE SRP RV 


ROT 

RXB 

RXC 

es A5 39). 
SUMV 

SWAY 


hes 


assumed column axial load (k) 

critical axial load of brace (k) 

design column axial load (k) 

girder plastic hinge rotations at A, B and 
C (radians) 

girder plastic hinge rotations at the end 
of the last load increment (radians) 
column plastic hinge rotations at L, U and 
D (radians) 

live load increment, lateral load increment, 
column axial load increment, joint load 
increment 

live load factor, lateral load factor, column 
axial load factor, joint load factor. 
joint rotation (radians) 

brace radius of gyration (in) 

column radius of gyration (in) 

column stability functions 

variable to cetermine column axial loads 
lateral deflection (in) 

variable used in equation solver 

girder shear at A and B (k) 

design joint load (k) 

joint load (k) 

joint load in previous increment (k) 


column shear at L and U (k) 
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girder shear due to applied load (k) 

girder shear due to applied load in previous 
increment (k) 

girder load (KLI) 

column width (in) 

distance from lower end of column to interior 
hinge (in) 

distance from left end of girder to interior 
hinge (in) 

plastic moment capacity of column (in-k) 

H - XC (in) 

LG - XG (in) 

column plastic section modulus (in?) 


girder plastic section modulus (in?) 
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CALL READ 


2 > ——{ CALL COEFF }———< 
35——— CALL LOAD 


CALL STAB 
CALL EE! 














CALL SOLVE 









HAS THE SIGN OF THE DETERMINANT 
OF THE COEFFICIENT MATRIX CHANGED? 





DOES THE NUMBER OF NEW HINGES AT 
PEAK’ EOAD EXCEED THE SPECIFIED MAX? 







RETURN TO THE HINGE CONFIGURATION 
AT THE LAST LOAD STAGE, AND REDUCE 
THE SIZE OF THE LOAD INCREMENT 








CALL SUBI 


ARE THE COLUMN AXIAL LOADS WITHIN 
NO 1% OF THE ASSUMED VALUES? 


YES 


FIGURE A.1 


FLOW DIAGRAM MAIN PROGRAM 
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CACLCCHECK 2 


CALL CHECK 1 


CALL CHECK 3 
/ HAS THE MEMBER HINGING 


CONFIGURATION CHANGED? 













IS HINGE REVERSAL TO 
BE CONSIDERED? 














INITIALIZE CERTAIN VARIABLES 
FOR THE NEXT LOAD INCREMENT 


IS THE LOAD INCREMENTING 
SEQUENCE COMPLETE? 


IS THERE AN ADDITIONAL 
FRAME TO ANALYZE? 





FIGURE A.1 


FLOW DIAGRAM MAIN PROGRAM (continued) 
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READ AND PRINT NUMBER OF 


STORIES AND BAYS, AND 
PERCENTAGE OF BRACING 


READ AND PRINT STORY HEIGHTS 
AND BAY WIDTHS 


‘J 


READ AND PRINT COLUMN, 
GIRDER AND BRACING DATA 













READ DESIGN LOADS AND 
LOADING SEQUENCE INFORMATION 





CALCULATE GIRDER 
Mp AND BRACING Pcp 


INITIALIZE CERTAIN 
VARIABLES | 


RETURN 






FIGURE A.2 
FLOW DIAGRAM SUBROUTINE READ 
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EVALUATE GIRDER STIFFNESS TERMS 
WHICH ARE INDEPENDENT OF LOAD 







EVALUATE AXIAL 
STIFFNESS OF COLUMNS 


EVALUATE AXIAL STIFFNESS 
OF BRACING MEMBERS 


RETURN 






FIGURE A.3 
FLOW DIAGRAM SUBROUTINE COEFF 
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IS THIS A NEW LOAD 


NO INCREMENT? 
mass 
HAS THE SIGN OF THE DETERMINANT OF 
THE COEFFICIENT MATRIX CHANGED? Re 










CHANGE SIGN OF LOAD 
FACTOR INCREMENTS 


DETERMINE APPLIED 
LOAD FACTORS 
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CALCULATE AND PRINT GIRDER LOADS, 
JOINT LOADS AND LATERAL LOADS 


CALCULATE GIRDER SIMPLE 
SPAN REACTIONS AND FIXED 
END MOMENTS 














EVALUATE GIRDER STIFFNESS COEFFICIENTS 
WHICH ARE DEPENDENT ON THE GIRDER LOADS 


COMPUTE APPROXIMATE 
COLUMN AXIAL LOADS 


RETURN 
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1S COLUMN 
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PRINT COLUMN 
nabs 


CALCULATE COLUMN 
Mpc 


CALCULATE COLUMN 
STABILITY FUNCTIONS 













EVALUATE COLUMN STIFFNESS 
COEFFICIENTS WHICH ARE DEPENDENT 
ON AXIAL LOAD 


RETURN 
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DETERMINE NUMBER OF UN- 
KNOWNS AND BAND WIDTH © 


INITIALIZE CERTAIN 
VARIABLES 














DETERMINE COEFFICIENTS OF 
MOMENT EQUILIBRIUM EQUATIONS 


DETERMINE COEFFICIENTS OF 
VERTICAL FORCE EQUILI- 
BRIUM EQUATIONS 
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RETURN 
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CAECULATE THE VALUE OF THE 
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MATRIX 
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FLOW DIAGRAM SUBROUTINE SOLVE 





COMPUTE ROTATIONS, 
DEFLECTIONS AND SWAYS 


DETERMINE COLUMN 
AXIAL LOADS 


DETERMINE THE ERRORS IN 
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COMPUTE THE GIRDER 
PLASTIC HINGE ROTATIONS 
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RETURN 
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COMPUTE THE GIRDER END 

MOMENTS AND SHEARS 
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ADDITIONAL GIRDER HINGES 
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PRINT COLUMN MOMENTS, SHEARS, HINGE CON- 
FIGURATION,Mpc AND PLASTIC HINGE ROTATIONS 






PRINT GIRDER MOMENTS, SHEARS, HINGE CON- 
FIGURATION, Mp AND PLASTIC HINGE ROTATIONS 


RETURN 
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ARE THE GIRDER HINGE 

ROTATIONS LESS THAN CHE 

PREVIOUS LOAD INCREMENT? 
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PRINT HINGE REVERSAL LOCATION 





COMPUTE ADDITIONAL GIRDER 
STIFFNESS TERMS REQUIRED FOR 
FURTHER LOAD INCREMENTS 







HAVE THE BRACING MEMBERS 
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RETURN 
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A.3 Data Cards 


order: 


The data cards for the program are read in the following 


the number of data sets to follow (15) 
an identification card (reproduces first 40 characters at 
top of output) 
number of column stacks, number of stories (counting ground 
level as story one), and percent bracing (213, F9.5) 
story heights (8F10.0) | 
bay widths (8F10.5) 
column properties, (one card for each column 
-~ read across each floor level in turn), 

IDENTIFICATION, AREA, Ly, Zys ry, WIDTH, Fy E 

(ASaePrO 20 Fore, SF7. 2yeF7.0) 
girder properties, (one card for each girder 
- read across each floor level in turn), 

IDENTIFICATION, AREA, Ly, Lys Fy EeUL DES) WEDES 

(hia F/ ea eoee G12; bteyen/Osaer/ 2) 
bracing properties, (one card for each possible bracing 
location - read bracing members sloping upward to the left 
across a floor level, then members sloping upward to the 
right, then proceed to the next floor level) 
IDENTIFICATION, AREA, ry 5 fl SE S( AG] IPR 27S.) 


y 
column base fixity, (one card for each column stack) (E11.4) 
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design loads 
FDES (8F10.5) 


VDES, (left to right then to next level )(8F10.5) 
PDES (8F10.5) 


loading sequence information 


Nis LELAS TAS IAREA ios OLREV2s TSTABs Om Ills Liz 

(915) 

NL: number of load increments if a particular arbi- 
trary sequence is to follow (if NL = 0, a regular 
load incrementing procedure will be used) 

PERSE if LEAST = boeanalysis will peverastic 

IAREA: if IAREA = 1, axial shortening of the columns 
will be suppressed 

INDo: if IND6 = 1, equilibrium equations will be listed 
if IND6 = 2, output will include only the sways at 
each load increment 

IREV2: if IREV2 = 1, hinge reversal will not be con- 


sidered 


PSRAB Sat ISTABS=—bagGr= 40 and.s 0? 

110: number of load increments before leeward hinge 
reversal considered 

I]]: maximum number of new hinges at peak load 


lj2: tf [12 ---=.5) analysis will be first order 


if NL = 0: 


read initial values of RLL, RF, RP, RV (4F10.5) 
read RINLL, RINF, RINP, RINV (4F10.5) 


Read number of load increments (15) 
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CU“MMCRSAREAILS ACCYG 104 Vs TXECS 04) 5 Z2XG( 9104) sAYGUS,04).,6619.04)% 
~LDES (9004) sLLDES( S004) 5LG(9.04) oW(S5 504) »VWA(9 404) ,VWB(9504), 
NF AGC (9604) .MFBA(9,04) sMFCA(9.04) sMFCB(9.04) »MAX(GS 204) »MBY(9 204) 0 
VWAL (9 204) oe VBL (904) CA1 (9404) »CA2(9 504) 6 CA3B(9,04) »CAS(Gs04) 6 
CA6(05 204) 208119504) ,CB2(5,04) .CB23(9,C4) .CB5(9204) 5CB6(9.04)> 
MRAP (9 504) 4+MABP (9504 )sMCAP (3404) »MCBPF(9204) »XG(9,04) eYG(Ge04) 0 
VAG 304) eVEB(S 204) sMA(9 404) .NB(S 204) »RABP (9404) sREAF (9304 )o 
RCAP (9504) +CELC (9-04) s.RBAPL (9.04) »RCAPL(9504) »PABPL(9,04) 
COMMCKRSAREA2]S AC (9004) »1XC (9504) 2XC (9.04) sRXC( S204) »WO( 904), 
BY GOCS.0S535EC(S ,04),6€C(9504).5S (9.04) .GGX%(S.04).S5SX(9+04 0s 
SENG 0S VeSSY (ars 040) wil (6,04), clLe(9s 04) .ClalS, 04) sca 5.04). 
CULL (S504) »CL2 (9 604) 5CU3 (95.04) .€US5(9204) sMD(9,04) »MC(9,04)> 
MULP (9204) »sMLLF(G304) »MOLP(9.04) sMDUF(9.404) 2XC(9,04) eYC(904) 0 
XMP (69404) »VL(9 204) sVU(G 504) »ML(9 104) oMU(9 +04) eRLUP( G04) 0 
RULP (9204) »sROLF (9404) ,DELO(9,04) oL (9) sH(04) 0K(G9)5SUNV(9),B8(100) 
COMMCKR/AREAZZS AE (940452) 5RX8(9s0402) sFYB(950452) e2EB(GS20402)5 
LEU9.0422)2C01(920432) ,CDO2(9,0442) .CD3(920452) .C04(G+10452) 
CC2(9 204) »PCR(G 204 92) sFS9(9 50402) sFBP(9 104 22) sFEX(920422) o~(100)e 
FOES (04)sVDES(9 304),PDES(9) sF (04) »P{9204) »PAPP(9504) eVINCR(9D 04) 6 
RF (3C0) »RLL(300);.RP( 306) 3A(100.45).,V(45545) s0ET»sRINEL eRINF eRINP Ss 
SWAY (04) »ROT(G204) sDEL(G304) .CD5(9.04s2) 6€7(9s 04) 2€8(9,04) »sRINVS 
RV (300) »VIT(G9 2094) sVITL(S5 504) 2C9(G204)2C10(9404) 
CCMMCKRSAREASZSZ JC(9304) 3 JC(9504) 5JB(9 50452) sINCEsNVMsNNoMMMLNNNG IL oe 
1 NASNEsNCYC, INC2,LLL»sNL>sINDO2(9),LELASTsNLAST es IAREA,INOsIREVsTREV2s 
2 ISTAESLILIOsTI1»11255JGL(9,04) sJCL (9,04) ,JOL(92.04,2) 5113-11 46115 
REAL MAWMBsML pMUsL 2 fXCesITXGsLLDESsLGrelLGsMFBA sMFABseMFEFCAsMFCBR os MAXe 
ITMEYsMEAPsMABPeMCAP,MCBPsNULP»MLUP2MDLP»MDUP3sKsMC,MD 
REAL*¥@ COLUMN ZERACE sGIRCER,ICENTIsIDENT2,10ENT32,I1CENT4s,I1DENTS 
REAO(S,1005) NFRAME 
1006 FCRMAT(1I5S) 
OC SSO I1=lsNFRAWVE 
IND=0 
CALL FEAD 
LEGhi .EbO.0)) GG FQ 77 
WRITE(6278) 111 
78 FCRMAT(CLHOs*MAXIMUM NUMGER OF NEW HINGES AT PEAK LOAD =4515S) 
77 «TF CIAREA.EQ.0) GC TG SCO 
WRITE(6,1007) 
10C7 FCRMAT(1HOs24FAXIAL SHORTENING IGNORED) 
500 LE CIELAST»~EQ.©0) GG TO 420 
WRITE (E1008) 
1008 FCRMATCIHOs1GFELASTIC ANALYSIS) 
42C TE CUSTABZEQ. 9)) GG, TO 38 
WRITE (6.421) 
421 FCRMAT(1IHOs*C=4. S=2*) 
36 FEGIVELEQ.0)" GO) TO 701 
WRITE(6.1091) I1C 
10S1 FORMAT(LIHOs,*HINGE REVERSAL AT LEEWARO ENO GF GIRDERS NOT CONSIDERE 
1D PRICR TO LGAG INCREMENT*sI5) 
701 IFCIREV~EQe0) GC TG 702 
WRITE (E5751) 
Cet FOCRMATCIHOs,*EINGE REVERSAL IGNORED *) 
LC2 LPC iVe.Ne.—5) EO TO Sol 
WRITE (E5752) 
Loe FCORMAT(1HO»*NG P-OELTA NOMENTS®) 
501 CALE CCERF 


seed NOOO SWhD = 


On > WN 


Ons Wh = 
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$02 CALL LCAD 
NCYC=0 
€c4 CAULIISTAS 
CALW EEL 
GCALIS SS GLVE 
LE OUVAdE Os —S)e CGY 1G 66 
[12=0 
66 LetGhie sa aNE~el Ie GG TO, 4S 
LC VwieEO.0) GG TO SO2 
PeGine «esis 1) co TG Sc2 
RINFHCeL¥RINEF 
RINP=O.1*RINP 
RINV=C elL¥*®RINV 
RINLL=OseTFHIALL 
IND3=0 
Tle=1 
TiG=It+l 
OC 60 N=1eNN 
OC SY M=1,¢M 
JCOMsN)Y=JCL(M¥,N) 
JECMeNe 1 =IBLIM.ND1) 
JEM eNe2)=JEL(M2NG2) 
JG(Ns»N)=JGL(M,A) 
LF (C9O(M»N)-EQe120) MABP(MsN)=—-MABP(M,N) 
IF (CO (MeN) 2E02220) MBAP(NYIN)=—-MBAP(MIN) 
IFC CO(M IN) -EQe 360) MCAF(M,N)=—KMCAF(MSN) 
IF (CO (MsN) -EQ 4420) MCBP(MsN)=—MCEP(MN) 
IF (CIO(M,N) -EC ot .O) MLUF(MsN)=—MLUP (MSN) 
IF (CIC(MsN) -EGe2eO0) MULP{M,N)=—MULLF(M.N) 
IF (CLO(MN) -EG2340) MCUP(MeN)=—MDOUP(M5N) 
TF (CIC( MN) -EG 6420) MOLE(Ns,N)=—-MOLP(MSN) 
59 CCNTINUE 
60 GENT INGE 
WRITE(6,50) [ND 
so FCRMAT(1HO.,ISs* NEW HINGES FCUNC ANDO LOAD INCREMENT DECREASED *) 
IND=90 
GEntG esol 
45 GABE S UB. 
PRONG yY GeGre 1 O)e.GG TO. sce 
PE CBW. Ge Ll CO 7 Gi 504 
DEG Gy Gall eelhO GC Aho SiCg 
503 wRITE (62999) 
S99 FGRMAT(1HOs+SOFPERMISSIELE NUMBER OF CYCLES OF ITERATION EXCEEDED) 
509 CO S2C N=1.,NN 
CC S19 M=1.MM 
F(Ms,N)=PAPP(M,N) 
oi Mee | CCNTINLE 
520 CONTINUE 
(a AG BECK 2 
CALL €Checx i 
GAUL CREeCkK 
PECLNG «Ghent )sGe 1G. 50) 
IFC IREV2.e<EGe1) CU TG 460 
Telos. L144) iGG 1G 400 
CALL OP REV 
IE CiReV Ge al 2) Ge LU SaOt 
4CO OC 450 N=2,NN 
NG 44S M=1,.MvhM 
RABPL (M,N)=RAEP (MON) 
REAPL (MsN)=RBAP (MSN) 
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449 
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64 
65 


RCAPL (MeNJ=RKCAP(N,N) 
CGN LENCE 

CCNTIAKUE 

DC 65 <=1eNN 

CC 64 M=1.MN 
JCLIMeN)=JC(MN) 
JGL(MsNI=IG(IMAN) 

JEL (MeNeLI=~YVE(MNO?L) 
JEL (MsNe2)=JB(M N52) 
CG(MsK )=0-0 
C10(Ms,N)=C.0 
CCNTINUE 

CCNTINUVE 

IF C(NLeEG-0) GC TC 540 
hisGltset alot GO) TO.) S02 
GG Fa sso 
PeGtiset nent AS!) CE 1G So2 
CCNTINUE 
STOP 
ENO 
SLBROLTINE READ : 

CCMMCA/SAREAILS AC(9504)-.IXG(9,04)32XG(9204) sFYG(9204) s©G( 904) o 

DLDES (9,04) sLLDES(9304) 1b G(9204) 0W(9 204) »VWA(9504)>VWS(9204)» 

MF AB(Ss04) eMFBA(G 204) »sMFCA(9 204) sMFCB(9204) »MAX(G 204) »MBY(9204)6 

VWAL (9404) sVWBL (9904) 5CA1(9504) sCA2(9204) CA3(9904%) 2CAS(S+04) > 

CA6(9 204) »CB1(9 204) »CB2(9204) 1€83(9 504) »CES(9+04) sC86(9r04)e 

NBAP (9,04) »MAEP (9504) »sMCAP(G 204) »MCBF(9204) »XG(9204) »¥Y¥G(G204)>» 

VA(9 204) s VBS 904) oMA(9 504) 2MB(9 104) s RABP(9204) sRBAP(9204)> 

RCAP (9404) ,DELC (9204) sRBAPL(9304) eRCAPL(9 404) »RABPL (9204) 
CCMMCN/ARE A2Z AC(9 504) s LXC(95904) > ZXC(9304) sRXC( 904) »wO(9204) » 

FYC(9204) 1EC(9304) 9€C(9 304) SS(9 204) 2COX(9104) sSSX(Gs04)>5 

ECY(S 204) +SSY(9204) 1€L1(9 204) eCL2(9,04) .CL 319504) sCL5(9 204) 

CUL(S 104) CUZ (9 204) »CU3(S 204) »CUS(95C4) »MD(9204) »MC(9s04)>5 

MULP (9204) »NLLE(9204) »MOLP( 9204) sMDUP(9 104) 5XC( 9204) »YC(S204)> 

XMP ($304) 9VL( 9204) sVUC9 904) sML(G 204) »MU(9 204) eRLUP(9 504) » 

RULP (9304) sRCLP(9 04) sDELD( 9204) sl (9)9H(04) »K( 9) sSUMV(9) 580100) 
COMMCN/SAREAZS AE (920492) 1RXB(9304 92) eFYB(9 20402) 2EB(9:0492)5 
1 LB(Se04s2) sCO01(5 00402) 9C02( 920402) 2CD3(990492) C0415 20422) 

2 CC2(9 204) s PCRS 204 92) 0FB(920402) sFEP(9e 0492) pF EX(9+ 0492) XC 100)» 
S) FOES (04) sVDES(9 204) sPDES{(9) sF (04) 5P(9204) sPAPP(9504) sVINCR(9504)6 
4 RE (300) »RLL (300) sRP{(300) 2A( 100645) 5V( 45245) sDET sRINLL eRINF sRINP © 
5 SWAY (04) sROT(S 204) sDEL (9 204) 9C05(950452)007(9504) 1C8(9204)sRINVG 
6 RV (300) sVITLS 204) sVITLI9 204) 0€S(5204)2C10(9,04) 

CCMMCKR/SAREASZ IC (9 004) 0 ISG(9204) 9 58(9 90492) sINDGsMMyNNoMMMoNNNG IL 9 
1 KAsNBeNCYCs IND 2 oLLLUy NL o IND2(9) » LELAST »NLAST sIAREAs INC) TREVs TREV2, 
2 [STAB s 110,11 Le T122IGL (9204) se ICL (9504) sJBL(9904s2) e111 351145115 

REAL MAeMBeML op MUoL» [XC o IXGsLLDES »L Gel »MFBA sMF AEB sMFCA sMFCB oe MAX» 
LMEY » MEAP, MAGP » NCAP ¢MCEP » MULP » NLUP #MOLF »MDUP 2K eMC eNO 

REAL *2@ COLUMN» GERACE sGIRCER»s [CENT1,1DENT2sI1CENT3,1IDENT4s 1 DENTS 


NOmn S WN = 


nf an~ 


tons 


REAC FRAME GECMETRY 


WRITE(652000) 


WRITE(6,2001) 
READ(£S+1060) LOENTL»IDENT2,IDENT3+1IDENT4»,IOENTS 


WRITE (6.1061) IDENT1,ICENT2+10ENT3+1OENT4,1DENTS 
WRITE (E2002) 

WRITE (642001) 

READ(S,1000) MM¥sNNSFERER 

KNM=MN-1 
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A-26 


KAN=NK-1 

WRITE (651062 JANN GNMM 

WFEITE (621063) 

KEAD(CES s1G001) (FCN) sN=1eN4N) 
CC 8 N=1.,NNN 

WRITE(6G 21006) Awt(N) 

GENTHI NCE 

WRITE(651064) 

FEAD(S e100) (LCM) »M=1e¥MM) 
OC 7 k=15MMM 

WRITE (6G 21006) MeL) 
CONTINUE 


READ MEMBER PFCPERTIES 


WRETECEe107S) 
WRITE (E+1067) 
O00 10 N=1+NNN 
OC 11 M=1.MM 


READ(E,1002) COLUMN sACOCMsN) op LXCOCMeN) op ZXC (MeN) sRXCIMEN) pWCOUMON 
Tyee YeC( MeN) sLCCUMaN) 
WRITE (621068) MsNsCCLUMN eAC (MeN) os I XC( MeN) a ZXC (MSN) sRXC(MIN) OW 


1C(MeoN) pF YC(MsN) SEC(MSN) 

JC{Me,d)=1 

CCNTINUE 

CCNTINUE 

DC G M=1>5MM 

wC(MesAKN )=WC(M sNK—-1 ) 

CCNTINUE 

WRITE (E1076) 

WRITE (6.1069) 

OC 12 N=25NN 

OC 13 M=1,MMM 

READ(S,1003) GIRDER sAG( MeN) os TIXG(MeN) »ZXG(MIN) sDFYG( MSN) sEG(MON 
1) sCLOES(MsN) »sLLOES(MsN) 

WRITE(631070) MsNsGIRDER PAG OM NJ cl XGUMeN) s ZXG(MsN) cEYG(MGN) EE 
1G(Ms,N)»,ODL DES (MN) »LLDES(MeN) 

CCNTIAULE 

CCNTINUE 

WROTE C60 lO77)) PERBR 

wRITE(E,1071) 

OC 14 N=1.NNN 

DC 15 M=25MM 

READ(S +1004) ERACE eAB(MeNol) sRXB(MeNol) oFYE(MsNol ) xEB( MON] 
1) 

AE(MsN,1)=PEREFXAE (MeN 1) 

WRITE(641072) MsNsBRACE eAB(MsNol) eRXB(MeNol) os FYE(MeNoel ) EBC 
IMsNol) 

CONFTINGE 

DQ 16 -M=1.MMM 

REAC(S,1004) EKACE eAB(MsNo2) oRXB(MIN02) eFYB(MoNo 2) sEBRCMoNG2 
1) 

AE(Ms,N52)=PERERFABR(MsNoe) 

WRITE(641073) MsN»e BRACE sAB(MaNo 2) sRXB(C Me Ne 2) sFYB(MeNe2) EGO 
IMsNe2) 

CCNTIALE 

CCNTIAULE 


REAG |GCUCUMN oFUxeLT Y, 
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47 
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20 
21 


26 
24 


30 


33 


WRITE (E21080 
DC 47 M=1,MM 
READ(E,1030) 
WRITE( 6.1081 
CONTINUE 


CALCULATE Gt 


OC 21 A=2.NKN 
CO 20 M=1.MM 
LGE(M,N)=L(M) 
JG(M,N)=1 
CONTINUE 
CCNTINUE 

OC 24 K=L NA 
I=1 

OC 25 M=2.MM 
LB(Ms,Ne1)=SO0 
JE(MeNo1)=1 
BECMsNs 1) =0' > 
FEX(AwNs,1)=0 
FOP(MsN,1I)=A 
CCNTINUE 

I=2 

OC 26 M=1.MM 
LE(M.,N32)=SQ 
JE(MsNe,2)=1 
BEN si\istl=O% 
FEX(M»NoI)=0 
FEP(MsN,TI)=A 
CONTINUE 
CCNTINLE 


REAC CESIGN 


WRITE (E,1082 
READ CEs 10 11°) 
DC 30 N=2.NN 
WRITE(631083 
CCNTIAUE 

WRITE (641084 
READ(S.,1011) 
OC 32 N=2;3NN 
OC 31 N=15MM 
WRITE (EGs1085S 
CONTINUE 

CENT IRUE 

WRITE (6510886 
REAUCSs LOTT) 
DC 33 M=1,MM 
WRITE (61087 


CENTINUE 


REAC LCACING 


WRITE (EG, 1088 
READ(S,1014) 
TF(NL.EC.0) 

DC 40 1=1,NL 
REAC(S,1015) 


Fear 


) 
K(™) 
) MsK(M) 


ROER € BRACING LENGTHS 


M 
—O«S#(WC(MSN) 4WC(MFE1LSN) D 


N 


KT (RIN) #H(N) +L (0M—1)*L (M—1L)) 
0 


20 
B(MsNsT)*FYBE (MINI) 


M 
RTCR(N)*H(N) 4L(M)%L(M)) 
10) 


20 
BCMsN, I) *FYB(MsNol ) 


LGACS 


) 
CFCES(N) »N=2,NN) 


IO NsEDES CN) 

) 

((VCES(MsN) »>N=154M)4N=2,5NN) 
) MsNsVOES(M,N) 

) 

CFCES(M) »M=1.MM) 


ey. GOES ) 


SEGUENCE INFCRMATICN 


) 
NUsTELAST »LAREAsINDE sTREV2,ISTABsI1Os,TL1lsI12 


GE JC 42 


REL CIV SRE CT PORE CLIVE CE) 
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A-28 


WRIETE(E 1089) IRLULC I) FCI) eRECL) »RVUL) 
CCNTIAKUE 

GE TOs =O 

PEAD(S +1015) RLLC1) RF C1) RPC1) sRVOL) 
[=1 

WRITE(CE 41089) ITeRLL (CT) FF C(I) sREC( IL) »RVOI) 
READ(Ss1015) RINLL SEINE sRINPLRINV 

WRITE (E1090) RINLLeKINF »sRINPSRINV 
READ(Ss», L016) NLAST 


CALCULATE PLASTIC MOMENT CAPACITY UF GIRDERS 


OC 340 N=25NN 

DC 339 M=1,YMN 

MEAP (MsNJ=FYGO(MeN)#FZXG(MGN) 
MABF(MsN)J=MEAP (M,N) 
MCAP(MsN)=MEAF (M,N) 
MCBP(MsN)=MEAP(M,N) 
CONTINUE 

CCNTIAUE 


CALCULATE CRITICAL AXIAL LOAD OF BRACING 


CC 35C N=1.NAN 

DCO 348 M=2,MM 

PERM sNo 1 )=9 -BO9EFRXB (CM No 1) *RXE(MoNe LIKES (MeNo lL DFAS( MENG LIS(LBUM, 
Nel)J*LE(MsN,1)) 

IF (PCR (MsN51)-eLE -FBF(M,N».1)) GO TCG 348 

PCR(M»N»1)=FEF(M,N,1) 

CONTINUE 

OC 349 M=1,MMM 

PCROM No 2)=96486GE*RXB(M N52) *¥RXB(MiNo2) KEB(MsNo2)*AB (MING 2)/S (LEM 
Ns2)*#LE(M»No2)) 

TF (PCR (MsNeo2) eLE.FEP(MeN,2)) GO TG 345 

PCR(MsN22)=FEP(MIN»2) 

CCNTINCLE 

CCNTINLE 


INITIALIZE CERTAIN VARTAGLES 


DET=1C0.0 

OG 37C N=2.sNN 
DC 369 M=1,NMM 
CS(MsN)=0,0 
MA(M,N)=0.0 
ME(M.N)=0-0 
MC(MeN 2=040 
VA(MsN)=000 
VE(M.N)=0.0 
CA6(MeN)=0-0 
CE6(MsN)=0.0 
XG(MsN)=120.0 
YC(M,N )=120.20 
VAAL (MN) =0.0 
VWwBL (M,N) =9.20 
KABFL (M4N)=020 
REAPL(M»N)=0.0 
RCAPL (MeN) =O0-C 
DELC(MsN)=0.0 
CEMTLINLE 
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372 


380 


10cG0 
10c1 
10C2 
1003 
1004 
1011 
1014 
10i5 
1016 
1030 
1060 
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1062 
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A-29 


CCNTIALE 

DC 372 N=1eNKN 

OC 371 M=1,NM 

C1O(¥,N)=020 

ML(M,K)=0.20 

MU(MsN )=020 

MC{Ms,N )=040 

VL(M,N)=0290 

VL(M,N)=0-0 

PAPP(M2N)=0-0 

F(M,»,N)=020 ; 

MULP(MsN)=FYC(NsN)*EZXC(MSN) 

NLUP(MsN)=MULP(M,N) 

MOLF (MeN) =MULF (M,N) 

MCUP(NsN)=MULF (KM 4N) 

XNP(MsN)J=MULP(M,N) 

XC(MsN)=120-0 

YC(M,N)=120.0 

CELD(’ »2N)=020 

VJITL(M»N)=020 

GENT INGE 

CONTINUE 

O0C 3890 M=1.NM 

P(MsNN)=0.0 

VJTL(M »NN)=0.20 

VJT(Ms1)=0.20 

PAPP( »NN)=0.20 

CCNTINUE 

IL=0 

IND3Z=0 

IREV=0 

FORMAT C2I3«F9.S) 

FCRMAT(8F10-20) 

FORMAT (CAS sF9 e2sF9 02 sF8e2s3F7e2sF 700) 

FORMAT (A8sF7220FG a2 e2F 802 oH la2sF %a0s2F7e2) 
FCRMAT(A8+3F7e¢25F720) 

FCRMAT(8F10-5S) 

FCRMAT{(9I15) 

FOCRMAT(4F10-5) 

FCRMAT(I5) 

FCRMAT(E1124%) 

FCRMAT (SAB) 

FORMAT (1H0OsSA@) 

FORMAT (1HO2I399K STGRIES»ssI13%2S5SH BAYS) 

FORMAT(1HOs17+STCRY HEIGHT) 

FORMAT(1HO»15SH EAY wIDOTH) 

FCRMAT(1H »13%€XeF60e0) 

FORMATI1HO,LO4HLCCATICN CvVPE AREA Ix 
1 ZX RX wLlOTH FY €) 
PGRMATC LH ww 13 ibhs 313s 5XsASs2(SXe F902} sSXet Gees SUSXe Vee) sOXs tov OP 
FCRMAT(LHO,LOEHLCCATICN TYPE AREA IX 
ex FY E DEAD LCAQ LIVE LOAD) 
FCRMAT(1H peladis Dis of Pas OX ep AS ooh ei ce el ais Se el a ie wt ree wis cate O 
LsEXeF 2e2eS5XsF7 02) 

FCRMAT(1LHOsEa@tF LCCATICN TYPE AREA Rx 
1 EY Eg 

FERMAT CIM, lS, la slaves Le SXsAGs Shab Cees oO Xet (acs eC 1 wile Omit 1 -es 
FGRMAT CIH slo csbkBeslovahs: 21 5X%s AG es SXs be SeakX el oes SX shee es oxer Wel) 
FCRMATCIHO+17HCCLUMNN FRCFERTIES) 

FCRMAT(IKO,I17FGIRCER FRCFERTIES) 
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1077 FCRMAT(LHOs*PROFERTIES CF DIAGONAL BRACINGs *+sF10.55* TENSILE & COM 
IPFESSIVE CAPACITY®) 


1080 FCRMAT (1HO,31FCCLUMN EASE SPRING CONSTANT) 

10€1 FORMAT ( 1H slxXa Pas 122X561 14) 

10&2 FCRMAT(1HO»,2StFLCCR LEVEL CESIGN LATERAL LOAD) 

1083 FCRMAT (IH ¢4X13514XsFl028) 

104 FCRMAT(1HO,320HJULINT DESIGN VERTICAL LOAD) 

10¢5 FCRMATOIH cI 2elteorl3sEXrsFlO0e5) 

1C&6 FCRMAT(1HO,42-FCCLUMN CES{IGN AXIAL LOAD AT CGLUMN TOP) 

1087 FORMAT(C1IH 21X,I3.15XsF10.E&) 

1088 FCEMATCIHO,*LCAC SEGUENCE EVE LVAD FACTOR LATERAL LOAD FA 
1CTOR AXIAL LCAD FACTCR JCINT LOAO FACTOR®) 


1cs9 FCRMAT(C1H PSX olTSslsxeFlOoS es lL2XsF1065913XsF1065912X%0F 1025) 
1¢90 FCRMAT (LHO».*®LGAC INCREMENT *7XsF100S5Ss12XsF1005913X%sF 10659 12X0F 100.5) 
2Cco FORMAT CIM] pt ERE REE RR ERE RAK ERE RARER RK KRE KEKE AS ERE) 
SCOCL FCRMAT (LH oP X¥RR AERA ROE RAE RD ER RRR EKA RERE EERE EERO) 
2002 FORMAT CLHO of FREER RRR REAR EKER E EERE ERR ERK KKK R EKKO) 
RETURN 
END 
SLBERCUTINE COEFF 
CCMMCNR/SAREALS AGC(9 404) 6 1XG(9204) 5 2XG(9404) sFYG( 9304) 1EG(9504) > 
OLDES (9304) sLLEES(9,04) 6LG(5404) oW(9204) »VWA(9 204) > VWB(9204) > 
NFAB(9 204) sMFEA(9304) »MFCA(9404) sMFCB(9,04) »MAX(9204) sMBY(Gs04)¢ 
VWAL (9204) » VWBL (9504) sCA1 (9404) »CA2(9 204) 6CA3(9504) sCAS(S2 04), 
CA6(S204)5CB1 (9204) »CB2(9+04) sCH3( 9404) +C€B5(9504) sCBE( 9,04) 6 
MEAP (GS 104) +» MAEP (9504) oMCAP(9504) »MCBF(9204)4XG( 9104) eYG(9,04)—e 
VAG 604) 6VB(9 504) »MA(9 604) 5 ¥B(9.04) » RABP(9404) eRBAP(9,04)y 
FCAP (G204) +DELC (9404) eRBAPL(9504)sRCAPL (9204) sRABPL(9,04) 
COMMCN/ZAREA2/ AC(9 504) + 1 XC(9204) o ZXC(9 504) sRXC( 9404) pWO(9,04)6 
FYC (9504) ,EC( 39504) 5€C(9504) 5SS(G04) sCCX(S 404) ¥SSX(9504) 6 
CCV (5 504) sSSY¥ (9504) 5CL1{9504)5CL2(9 204) 5CL3( 9404) sCL5(9304)> 
CU10ES 604) 5CL2(9 504) 6€U3(9 04) »CUS(9 204) »MD(9504)5MC(9,04)— 
MULP (9204) sMLUP(9504) »MOLP(9+04) sMDUP(9204) »XC(9104) sYC(G+04) >» 
XMP (S404) 5VL(9404) sVU(9 404) »ML(9 504) »MU(9,04)+RLUP( S104) 9 
RULP (9204) sRDOLP (9204) sDELD(9404) sL(9)5H(04) K(S),.SUMV(9) ,8(100) 
CCMMCN/AREABZS AE(G.0452) »RXB(950452) -FYB( 920452) sEB(G204e2) 0 
LBS 40442) sCO1(G 20492) 1C02(930402)5C03(920492) 5 CD4(9r.04s2)0 
CO20G 504) sPCR(9 50402) sFB( 990442) sFBP(Gs 04 52) sFBX( 940402) »X(100)0 
FDES (04) sVDES(9 .04),PCES(9)»F (04) 5P(9304) sPAPP( 904) sVINCR{9204) 6 
RF (300) sRLL (300) »sRP (300) 5A( 100 +45) 5V(45 045) sDET sRINLL oe RINF eo RINP 
SWAY (04) +ROT(9504) DEL (S404)2CDOS(9s 0452) 107(9304) 1C8(904) sRINVe 
FV (300) sVJT(9904)5VITL(9 104) 109(9.04),C10(9,04) 
COMMCNZAREASS JC(9304) 55G(9204)s45E(9 20492) sINDGe MMs NNoMMMoNNNo IL 
1 NAsRESNCYCs INC3 eLLLs AL» IND2(9) ys LELASTsNLAST sp LAREAs IND es LREVe LREV20 
2 ISTAESTVOsT 11.1123 IGL (9.04) sJCL(9504),J58L(9,04.2).113.114,115 
REAL MAsMBoML sMU cL 9 1 XC oI XGeLLOESsL Gel Be MFBA »MFAB sp MFCA sMFECH eMAX, 
TMEYsMEAP»MABPsNCAFS,NCEP sMULPsMLUP sMDLP eo MDUP 6K pNCoMD 
REAL#@ COLUMN, BRACE »GIRCERs ICENT! » LOENT2,10ENT3,ICENT4, IDENTS 


AOFP WN = NOMPWN& 


Tn Pwd =» 


EVALUATE COEFFICIENTS CF SLOFE—-OEFLECTION EQUATIGNS WHICH ARE INDEPENDENT 
CECA 


GIRCERS 


AAAANDNAA 


CC 129 M=1.¥MM 
BC 119 N=2sNN 
IF CIG(MsN)-EC.1) GG TC 110 
DE 436 (MsiN) 2&G.62) CO) TO, .111 
TECIG( MeN) csECed) GO TG 112 
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CECIG Ms) ss 4) GO ty Gel 14 
DCG Ceti el Ga) GC mt iLL a 
LERNG CMa t «ei Geo? GC TH Pts 
DECUIGOMsaANJcECea7) GO TG 11e 
LECUGUMeN) .ECGeS) GG TO 117 
Lie MGGM see Oe lO) GG Te rio 
PRG GhMsNelCe ll) GCG TO 110 
LRCIGONANIGEQsl2)} GE TE 1170 
LeOLGGe NY .EO.1S) GC TE 112 
LECUIGUN SN) e©=Oel4) GE FO erst 
Pe CIGUN at detGe l=) GO Te tis 
LECIGCMeN I <EOe LE) GO TE-its 
LELGOMN SN Pee Gel} GO TQ =213 
IFC JIG(M,~N)-EG~£1@2) GO TC 112 
IFCIGC(MsNY<EQ.<20) GG TC 116 
IF CIUG(MeN)-EQ.~21) GO TO 115 
CI=WC(MsN)/SLG(H¥LN) 
D2=WC(Mtl»eN)JSLG(MSN) 
DI=EG(MN)*¥IXG(MsN)SLG( MeN) 
D4=O3/LG(M,N) 
CA1L(MsN)=(42042204D1)%*D3 
CA2(M,N)J=( 22043-2002) *03 
CA3(MeN)=6.0*04 
CB1(Me.NI=(2.04320*61)4*D3 
CB20M»,NI=(4204220*D2) *03 
CES (MsNI=CAZB(MGN) 

GC TCO 119 
DI=WC{(M»sN)/SLG(MsN) 
D2=WwC(M+1lsNISLG(MeN) 
DI=EGC(MN)*XIXEC(M»NISLG(M,N) 
D4=C3/LG(M3N) 

CA1(MsN)=0-20 

CA2(MsN)=0.0 

CA3{M.N)=0.0 
CELI(MIN)=1.25*01403 
C820M,NI=(3.04+1254*D2) *¥03 
CE3(MsN)=3~20*04 

GE Tea! o> 
D1=WC(M,N)Y/SLG(N,N) 
D2=wC(M+1l»sN)/S/LG(M»N) 
CA=EG(MsN)*IXEC(MsNISLG(MeN) 
D4=02/LG(MsN) 
CAI(MsN)=(3-041-£*01) *03 
CA2(MeN)=1 -5*C24*C3 
CAI(M»N)=3.0*0D4 
C£1(MsN)=0-0 

CE2(Ms,N)J=0.0 

CE3(M,N)=0-0 

GCG Lig 

DES=XG(M aN) **3 

CE=YG(MsN)*¥*3 
01=1.0/7(C5+06) 
D2Z=EG(MsN)¥IXEC(MsN) 
D3=wC(MsN)/S/XG(M»N) 
O4=WwC(MF#LeNISYE(MeN) 
CAL(MsNJ=DLEXGOM oN) #XGOMIN) ¥(32041265%02) €02 
CA2Z(MeN)J=OL¥EXG(M IN) *#YG(MeN 2 *(3204125*04) *D2 
CA3BOM sN)Y=DL*¥XG(M NR) 4320402 
CELCMIN)=O1L¥*¥XG(MeN)¥YG(MeKR)*#( 320412503) *02 
CE2S(MeNI=DLEYG(MeNIXYG(M ON) #( 30041 6E5%*D4) *02 
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116 


119 
129 


CE3S(M »NY=D1L*YC(M NN) #3260402 
NC(M,N )=MCAP(M,N) 


GCS LO. 159 

CAL(MsN)=0.0 
CA2(MeN)J=0.20 
CAZ(M5N)=0.0 
CE1L(M»N)=0.0 
CE2(M,N)=0.0 
CB3(M2N)=0.0 
GC TO 119 

CA1(M,N)=0.0 
CA2(MsN)=020 
CA3(MeN)=020 
CE1(MeN)=0.0 
CB2(M.N)=0.0 
CE3(MeN)=0.20 


MC(MsNIY=MCAP(M,N)D 


GC TG 119 

CAI (MsN)=0.0 
CA2(MsN)=020 
CA3(MsN)=0.0 
CEL(MeN)=0.0 
CE2(MsN)=020 
CES(M»sN)I=0.0 


MCOMsN)=MCAP(MyN) 


Ge TO 119 

CAI(MsN)=020 
CA2(MsN)=0-0 
CA3(M+N)=020 
CE1(M,N)=0.0 
CE2(MsN)=0.0 
CE3(M,N)=0.0 


MC(M»N)=MCAP(MsN) 


CCNTINUE 
CCNTINUE 


CCLUMNS 


OC 210 N=1eNNN 


OC 20S M=1_,MM 


TECTAREASEQ. 1) GG TC) 202 
CC2CMs+NI=AC(MsN) *EC(MsNI/SH(N) 


GERIOCZOS 


CC2(MsNI=1LOOOO*FAC( MIN) KEC(MeN)/SH (AN) 


CONTINUE 
CONTINUE 


OIACCNAL ERACING 


00 159 [=1,2 


CC 15@ N=1eNNN 
LE ChSEROS2) se C6sTe 


OC 154 M=2,MM 


TE CAG CMa Ne I) ) 185451525154 


JE(Mshe.1)=9 
CCNTINUE 
GC ITO aLS38 


OC 1857 N=1.¥NM 
TFCAD(MoeNeLDIIS7T®AISES1E7 


JEIMsN.IT)=9 
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169 


170 


17l 


Die 
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174 


CCNTINLE 

CCNTINUE 

CENT INCE 

OC 180 I1=1,2 

OC 179 N=1.NNN 

Tei etGea) GOTT Em 70 
DC 169 M=2,MM 


CI=AB(MNeLIFEE(MLNT)SLE(MsNoTl ) 


DeE=L(N—-1)/LB(M NL) 
OC2Z=H(NI/SLB(MsNGT) 

LR CLEC MsNs lf.) 2eEGCe1),.GO TG 
TE CIB (MeNel) -EQGe11) GG TO 
CO1(Ms,N51)=0.0 

CDO2(M »sNoI)=0-0 
CCO4(MeNoTI=020 

Pe CIE CUS Net je GOs 2h) “CO =e 
PE CIELCM aN st VeaGes.) (GO TG 
LE CIECMSNs 1) 2EO.S) GO TO 
CC1(MsNoI)=OCL*¥C2#D3 
CO2(MsNoT )=O01*02#D2 
CO4(MeNol J=D1L*XO3¥D2 
CCO3(M,»,NeIT)=0-0 
COS(M.N5I1)=0.90 

GOPTOMIGS 

CO3(MsNeI V=OSB¥FEF(MsNo1) 
COS(MsNel=D2*FEF(MsNoI1) 
GC TO 169 
CC3(MeNo TI Y=—-D3S*FCR(MsNGI) 
COS(M»Ne2T)=—-OZ*PCR(MsNoI) 
GORTOMLES 

CO3(MsN51)=0.0 

COS(Ms+yNot )=0-0 

CCNTINUE 

GEST TTS 

DO 17& M=1.MMM 


DI=AB(MsNs 1) ¥*EB(MsNoTI/LB(MsNo IT) 


D2=L(M)/SLB(MeNoI) 
D2=H{(NISLBCMsNs 1) 

IF CJE(MeNdT)-ECe1) GO TC 
[F(JECMsN5,I)-EQ211) GC TC 
CCO1(M»Nel =0-0 
CO2(MsNeoI)=020 
CO4(MsNsI)=020 
TF(JB(M,NsoI)-eEGe2) GO TO 
IFC JE(MsNeoI)-EC23) GO TO 
[FC JB(MsNeT)-ECGeS) GO TO 
COCL(MsNo 1 )=D14C2 403 
CO2(Me,Nof 9=01*02*02 
CO4(MeNo I) =01*03*D3 
CC3(MsNs1)=0-0 
CCS(MsN2I)=0-0 

Go) TOT Nes 

CO3(MsNol )=O34FEF(MoNo I) 
COS(M»Nol )=D2*FEF(MsNo1I) 
SG TO 178 
CO3(M.N>1T)=—-D34FCR(MNoT) 
COS(M.N, I) =—-O2*FCR(MsNeo I) 
SCS NOE 73 

CO3(MsNoI)=0-0 
COS(MsN,1)=0.-0 
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CCNTINUE 
CCNTIKVE 
CCNTINUE 
RETURN 
END 
SLBROLTINE LOAD 
COCMMCN/AREAILS AG(9504)5 1XG(9404)52XG(9s04) sFYG( 9.204) sEG( 9204) 
OLDES(9.04) sLLOES(G.04) »9LG(9204).W(9 90%) »VWA(9D 404) ,VWB(9D 04) 6 
MFAGB (9 +04) sMFEA(GS.04) »MFCA(9 204) »MFCB( 9504) »MAX(9304) »MBY(S204)>5 
VWAL (9504) sVNBL (9004) 4CA1 (9304) 6 CA2(9904) 5CA 319404) sCA5( 9204) 2 
CA6(5 904) 5€81(9 404) .CB82(9 204) »CB3(9 004) 1CB5(9404) »CR6(9104)_5 
MIAP(9204)+MABP (9404) »sMCAP(9.04) »MCBP(9,04) 2XG(9:04)5YG(G,04)» 
VA(S 104) 5VB(9 104) 6MA(G 404) 54519104). RABP(G+04) sRBAP(9;04)o9 
RCAP (9504) .DELC(9+04) sRBAPL(G204) +RCAPL (9404) >RABPL(9,04) 
COCMMCKR/SAREA2/Z AC(9104)51X%C(9.04) 3 ZXC( 920%) sRXC(9,04) »WC(9204)>5 
FYC(9 204) .EC(9 +04) 6CC(9 004) 9SS(9304) »COX(9 204) »SSX(9Dx04) 0 
CCV(9104)4SSYV(9504) 5CL1(9504) 6CL2(9504) 0€L 319404) eCL5(9204) 0 
CUL(09 504) 5CU2(5 404) 5CU3(9 504) 5CUL5( 9404) 2MD( 9204) oMC( 9204) 0 
MULP (9205) »MLUF (9404) oMCLP(9204) sMOUF(9 204) 2XC(9404) sYC(9204)>— 
XMP (9204) o VL (9204) 6 VU(9 +04) »ML (9:04) »MU(9,04) sRLUP (9404), 
FULP (9204) »sROLP (9204) sDELD(9504) oh (9) 2H(04)4K(9)sSUMV(G).B8( 100) 
COMMONZAREAZ3/S AB(920452) sRXB(900402) 2FYB(920422) sEB( 920492) 0 
L80930452) 6COi (9.0402) CD2(93U452) 6C03( 95,0402) 1CD4( 920492) 
CC2 (9 04) se PCR(9 404 62) 9 FB 1920462) sFBP (940452) sFBX(9s0452) sX( 100) 6 
FOES (04) sVDES(S5 604) 2PDES(9) sF (04) 2P(9,04) sPAPP(9,04) sVINCR(9204)e 
RF (300) sRLL (300) sRP(300) .A( 100045) 0V( 45245) DET eRINLL eRINF oa RINP 
SWAY (004) sROT(9 604) DEL (9404) 0 C€05(9 20452) 0 C7( 9404) 2C8(9104)sRINVO 
RV (300) »VJIT(G 304) »VITL(5 304) 0C€S(9,04) »€10(9504) 
COMMCR/SAREASS JC(9304)25G(9504) 2 JB(9,0452) s INDGoMMsNNoMMMsNNNolIL 
1 NAsNB»sNCYCsIND2 oLLt oAL ep IND2(9) pL ELAST »pNLAST o LAREAs INOs ITREVs IREV2.9 
2 ISTABsT1IOsILislt2s IGL(9.04)54CL (9,04) 2J8L(9:0492) eLI3BI14s115 
REAL MA sMGeoML »>NUsL sIXCsIXGsLLDESsLGsLEx»MFBAsMFAEsMFCA sMFCBeMAX >» 
IMBY sMEAP sMABP os MCAP »sMCBP »MULP»MLUF sMOLP»MDUP 9K »MC»MD 
REAL*@ COLUMN, ERACEs GIRCERs, IDENTIsIOENT2,10ENTS »pIOENT4SsIOENTS 


ANF WH & NOW SWN = 


AN fSWN = 


DETERMINE APPLIED LGADS CN FRAME & COMPUTE FIXED END MOMENTS 


FEC TRES seEGeiy GE Te ass 
IF(T122EQe-1) GO TQ 893 
TP CING.GEsl} GO TG ess 
IF CIREV.GEe1) GC TO 895 
IL=IL41 

WRITE(651309) IL 

TEGO <6EOe. tk GO TO) 77 
IF (NL eGTe0) GG TQ 308 
LAGER eGE.0s0) GC TH 909 
IFC INC3e“NEe«1) GO TA GOO 
RINF=—-RINF 

RINP=-RINP 

RINLL=-RINCL 

RINV=-RINV 

Galo? JO) 

IFCINCeGE21) GO TQ 308 
IFCIREV.eGEel) GE TO 308 
CONTINUE 

IFC IU e-EG.1)_GG 1G 308 
IL1’=It-1l 

RFE CILJY=RFCILI) FRINE 

RLL GIL Y=RLLC ILI) +4RINLLE 
RE CIL J=RPCILI) FRINGE 


ve 
i 


ib 


a 


yl’. 


* 
roay 
a Hho | 


1» Foie, @ 


na @ OE 
rie TEe eh) + OC) BOAT s de 
i pt 13k of PO rP LAL Wat 
iia Y, er ies Oage 
pm + stm g dt HI 


7 


ef 


hey (@Og eH hy 


' 
sl » 


{ , 


“Tee a 7 


AG: 
ya 


aL 


» 


tec 


‘fo, 


oye 


AO «WL psa, tdewe 


2 1cerey t 


GO) SeGOTE 


29h ethOeh Oe Vie SHAN 
ats C09 OE de Oo Ie 
+o Lede PEAT V4 Ole lee Med OO, 01 GRee 2 
(e008) ORV ¢ Cl OOs BL Mes CHO. EI AA ek 
ot NOs UPSD CPOs Pheoo. 4200R1 84S * 
6 FYI Med OS PNRM. 0 OP OARM OE 
wie oie Oi eee Ce SG, OFGV se Cet OTe 
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ue ho. DV CEB 1a (ED EINK 2 
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thee ds 999 wy ro FIED 8 0eOePr as F 
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«on GE Ge (debe bedeet 
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fad 


3C38 


6038 
310 


693 


420 


RVCTILI=ARVC ILI) tRINV 

GC* TO 303 

IL2=It-2 

RP CIL =RPCIL2) 

RF CILI=SRFECIL2]) 

RVCILI=RV(IL2) 

RUC Ey =RUL rte) 

OG 310 N=2sAN 

F(N)=RF (IL) *FCES(N) 

DC 30S M=1.,MMN 

W(MsN)=OLDES (MeN YFRLL (IL) ¥LLOES(M.N) 
VWACM »N)=WIMN)¥*¥L GI MIN) 42420 
VaB(MsN)=VWA(MN) 
[ECIGUMSNI<EO.4) GO TQ 3Y1t 
IF(JG(MsN).EQ.E6) GG Te 311 

IF (JG(MeN) eEQe7) GC Ta 311 

IP (S6 (MeN 2c£O0.8). GO TE 311 
TF(JG(MsN)*eEGel1S) GO TO 311 

LE CIGUMEN ces 17) -GOr TO) Sit 

IFC JG(MeN)-EQ.20) GO TC 311 
IFCIG(MeN) sEQe21) GO TO 311 
MFBA(MsN)=WOMSN)*¥LG(MSN)¥LG{MIN) 414420 
MFAB(MsN)=—-MFBAIM,N) 

GG 10° 309 

MFCA(M oN =WO MeN) XG(MIN) ¥XG(M9N) 144020 
MFAB(M3N)=—MFCA(M,N) 
MAX{M»sN)=620¥MFCA(M,N) 

MFBA(M sNJ=WOUMSN)*¥YG(MON) ¥YG(MIN) 414400 
MFCB(MsN)=—-MFEA(M,N) 

MBY (MsN)=620*MFEA(M,N) 

CONTINUE 

OC 508 M=1.MM 
VIT(MsN)=VOES(M,NIFRVCIL) 
CCNTINUE 

CONTINUE 

If (INO3.EQs1) GO TG 693 

Lech Vase Qe bh) Go aG te93 

{FC INDseGEe1) GO TQ 700 
FEIGUREVecGes 1) CC +1 O)'700 
ERPCINCGsEGs 2) —Ge TO:"9S0 
WRITE(651300) 

OG 420 N=2,NN 

WRITE (G6s1301)N2F(N) sRECIL) 
CCNTINUE 

WRITE(651302) 

O00 32S N=2sNN 

OC 324 M=1.MMM 

WRITE (601303) MeNow(MeN) »RLLCIL)D 
CONTINUE 

CCNTINLE 

FCRMAT(1LHO»44HKCCLUMN APPLIEC LCAD 
FCRMAT(LHL,1SFLOAC INCREMENT 214) 


FCRMHATCIHO,44FFLCCR LEVEL LATERAL LOAD 
FORMAT CIH »16e.10XeF1045e7X»F 1065) 
FCRMAT(LHOs44+C1ROER UDL (KLF ) 


" FGRMATCIH o13.13010XsF1005s7XsF1065) 


LCAD 


LOAD 


LOAD 


EVALUATE GOEFEICIENTS SP SECPE-OEFLECTIONSEOUARIGNS 


CNSTHE LOADS GN TERE GIRCERS 


FACTOR) 


FACTOR) 


FACTOR) 


WHICH 


ARE OEPENDENT 
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121 


23 


GC TO 700 


WRETECE6sle25) RECTLY SREUCIE DSRPCIL) 
FCRMAT(LHOse *LGAL FACTCR 
* ».F10.5'6* . AXTAL ULCAC 


DC 13£ N=2eNN 
DC 134 M=1,MM 


IF(IG(MeND-EC.L) GC 
IF (JG(MsN)2EQ.2) GO 
TF (IG(MsN)2EQ-3) EC 


IF CJG(MeNILEQL4) G 
IFC IG(MsN).FOLS) G 
TFC IG(MN) ECE) G 


Cc 
iB] 
Q 


TFC IG(MIN)2EQ27) GC 


IFC IG(M.N).EQ28) G 
IFC IG(MeN)LEGL10) 
IF CIG(MlN).EC.11) 

IF (IG(IMeN) -EQ.212) 

IF CIGOMeEN) -EGe13) 
IF CIG(MsN) eEQe14) 
IFC UG(MeN) eEQe18) 
IFC IGIMsN) -EQe1E) 

IFC YIG(M2N)-EQ.17) 
IF (JG(Me.N) -EQe18) 
IF (CISG(MsN) eEQe20) 
IFC IG(M.N) -EQ-21) 
CAS(MeN)=MFAB(M,N) 
CES(MeN)=MFBA(M nN) 
TE CIGCUMIN) «EG .t) 


Cc 

GC 
GC 
co 
GC 
GC 
fez) 
GO 
GO 
GC 
GC 
Go 


GC 


TC 
Ta 
nig &. 
Lie, 
Ta 
Ta 
Te 
TOG 
TO 
TO 
TO 
TO 
Tc 
Tc 
TO 
TO 
TOG 
TO 
TO 


TO 


IFC IG(MsN)2EC2I12) GO TC 
CAS(MeN)=CAS(MsNI*FCAG(MON) 
CES(MsNJ=CUS(MsN)+CBEO(MEN) 


GC TC 130 
CAS (MsN)=MAUP(MN) 


120 
Let 
122 
123 
124 
ts 
126 
127 
120 
120 
120 
i ded 
121 
123 
121 
123 
122 
126 
125 


130 
130 


LATERAL LCAD 
tf LO~S2 


Sen LOve Sig © 


CES(MeN)=MFEACMSR )—-0 eS*¥MFAB( MIN) F00S5*MABP(MON) 
IFC IJG(MsN)-EQe2) GO TO 130 
IF(IYG(M»N)-EQe1G) GO TO 
CAS(MeNI=CAS(M aN DtCAE(M,N) 
CBS(MsN)=CBUS(MeN) tCBE(MSN) 


GC TO 1230 


130 


CAS(MeN)=MFAB(MsN)—O065*MFEA(M9N) +065 *MDAP (MSN) 


CES(MsN)=MBAP(M,N) 


IF (SG(MIN)-EGe 3) GO TO 
LEKUGI MeN <oLOeHe)) GO TQ 130 
CAS(MsNI=CAS(MeN)DF+CAE (MSN) 
CES(MsNI=CBS(MeK)+CBE(MSN) 


CEA. 130 

CS=XC (MN) **¥3 
DE=YG(M,N)*¥*3 
Ci=1-C/(DS+DE) 


130 


A-36 


LIVE LOAD 


CAS (MsN)=O1L*(CS*(MFAB( MeN )—-O oS*¥MFCA(H IN) 2 4+0065*OS-DE) *MCAP(M2NI—-(DO 
1LGEMAX(MIN) )#0XGOM—N)¥YG(MIN) FYG(MON) ) ECMFBAC MIN )—O0 eSEMFECB(MeN) +105 


2eVCBP(MN)-MEY(MeN))) 


CES (MeN) =D1 * (CE (MEBA( MeN )—O oS ¥MFCB(M ON) 2 +00265*#0E-DE) ¥MCBF(M2N)#(0 
1S*MBY(MaN)) +0 XG(M9N) ¥XG(M ON) *YG(MON) ) XC MFAB(MIN)—0 ¢S*#MFCA(MON) #165 


2*NCAE (MN) #tMAX(MIN) DD 


IFC IG(MN)D-ECe4) GO TC 
CAS(MeNI=CAS(MeN) FCAG(M ON) 
CES(MesNI=CUS(M KR) +CEG(M IN) 


GCe TGs 130 
CAS( MeN) =NMABP(MLN)D 


130 
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OF a*)* 


A-37 


CES(MesN)=NBAP(I,N) 
GC TG 130 
125 CAS(M¥eN)=MABP(M,N) 
CBES(MeNI=LYGCOM eR IAXG( MEN) )*(AABP (MIN) tMCAP (MeNJ—MAX( MON) ) tMEYOMON)D 
1—-V¥CEP (MeN) 
GG TG 130 
126 CAS(MeNI=HCXG(MeNISYG( MIN) VEC MCBR (MSN) tMBAP (YNJ—-MEY (MeN) J)—-MCAP(MSN 
1)—MAX(M »N) 
CES(MesNI=MBAP(M,N) 
GO Te tsa 
Wary CAS(M,N)=MALP(M,N) 
CES(MsN)=MBAP(M,N) 
tO CCONTIARUE 
124 CCNTIARUE 
LESS CCNTINUE 
CCMPUTE APPROXIMATE AXIAL LOADS IN CCLUMNS 


IFCINCEs«EQee) GO TO 919 
WRITE (E1299) 
$19 IF (NLC eGT.0) GC TC 307 
Te Cre «Gt.t) GO TE Sco 
307 OG 312 M=1.+M™M 
P(M,NN)=RPCIL)I*FCES(M) 
TE CINGG.EQe2). GCG TQ 920 
WRITE (691301 )MeP(MeNN)SRFCIL) 
S20 SLMYV(CM)=PC(MsNN) 
3 ike CCNTINLE 
GO aoeco3 
500 OC S02 N=1,.MM 
P(M»NN)=RPC IL) *FOES(M) 
EP UINGG «EG. 2) CG TG 921 
WRITE (6 s1301IMePC(MsNN) »RECIL) 
921 F(MsNN)=(RPCIL)-KPC ILI) )*¥POES(M) 
SULUMV{M)=PUM.NN) 
soc2 CCNTINLE 
503 IF (L12.EQe1) E€O TO S04 
LEGIND «GE.1), GO TO 701 
IFCIREVeGEe1) GO TO 701 
S04 CG 314 N=2,NhN 
VINCRCLeN) H=VBACL NI-VWAL CL oNIVtVITC LO NI-VITL G1 oN) 
VINCR (MMsN)=VWBCNMMsN)—VWGEL (MMM yg N)#VITOMM9NI-VITL COMM OND 
TECUMCEGS2]) GO TC 314 
Oc 31€& M=2.MMM 
VINCR (MeN) =VWA(MeNI—-VWAL (MN) 4VHB(M— 1 oNI-VWBLOM—LONIDEVITOMONI-VITL 
1 (MeN) 
315 CCNTINULE 
314 CONTINUE 
J=1 
Ey Vs) N=NN-J 
[LAGNsEG. 0) GO FO, 32.0 
OC 317 M=1.¥M 
SUMV(N)=SUMV(M)4VINCR(MeN41) 
PAPP(M.N)=P (MeN) #SUMV(M) 
=I 4 CCNTINLE 
J=J+1 
GGyTO0 5316 
CCNTIACLE 
Be 2237) N=2 enh 
CC 322 M=1.,"MM 


(a 
N 
o 





nN 


222 
7190 


Vil 


720 
tet 


A-38 


VWAL CM sNJ=VWAC MSN) 

VWEL(MsNJ=HVNB (MeN) 

CCNTINLE 

OC 6228 M=1,MM 

VITL OM eNI=VIT(MSN)D 

CONTINUE 

CONTINUE 

CONTINUE 

RFITURN 

ENO 

SLARCLTINE STAB 

CCMMCRSAREALZS AC(9 204) os TXG(9004) ee 2ZXG(9s04) 6FYG(S204) +EG(9s04)» 
CLODES (9204) sLLDES(9:04) sLG(9204) oW( 5204) sVWA(D 104) »>VHB(9504) © 
NFAB(G9 504) »eMFCA(9 604) oNFCA(S 204) eMFCB(9304) MAX(G 204) eMBY(GeO4Do 
VWAL (9G 504) sVHBL (5 2004) 6€A1(9204) 5CA2(9 404) 2 CA3(9304) »CA5(9204)o 
CA6(G 204) .CB81(9 204) »CB269 04) »CB83(9504) eC 851904) »CHE(9,04) 6 
NBAP (9204) sMABF (9204) 2MCAP(9 204) eMCBP( 980%) eXG(9r04) +6YG(GeO4)De 

G VAS 004) eVB(G 404) sMA(S 004) »¥B(9 104) sRABP(9 004) eREAP(9404 Do 

7 FRCAP (9.04) »DELC(9.04) »sREAPL (9204) »sRCAPL (9204) sRAGPL(9,04) 
COMNOCNRSAREA2S AC(G9 204) eT XC(9 204) 5 2ZXC(G e004) sRXC(G904%4) »pWO( 9204)» 
lL FYC(Ge04) ECOG 204) 0€C(9 C4) 0 S865 904) sCOX(G 204) »eSSK(G204) 5 

2 CCY(S 204) »SSY¥(9 104) 6 CL1(9204) oCL2( 9404) CL 3( 9204) »CLS5(9504) 0 

B CUL(S 204) ,CUE(S 604) eCUS (9 604) 6 CUS( 9204) 54019204) »MC1(904) 5 

4 MULP (9,04) »eMLLE(9.04) sMOLP(9.04) »MDUF(9404) 2XC( 9204) sYC(9204) 0 
S 

é 


WF wn ~ 


XMP (S504) »VL(9404) »VU(S 904) oML( 9204) 2MU( 9204) sRLUP( 9504) © 
RULP (9594) eROLF (9204) sDELD(9 +04) oL (9) »H(04) oK(9) »sSUMV(9)28(0100) 

COMMCEKA/SAREA3ZBS AL (G2 0402) RXE(92 0402) sFYB(9 10492) sEB(G20402) 0 
1 £6(69.C452) 6 CU1 (5 50452) 0CO2(9 20452) 5C03(9r0402) sCD4(Gr204e2 do 
2 CC2(G 204) PCRS 004 02) fF B(9304 52) sFBFI9 10452) oF BX(9204s2)sX(100)6 
3 FDES (04).VDES(9+04) sPDES(9) 0F (04) »P (904%) sPAPP(9204) eVINCR(9 204) 
4 RFE (3CO) »RLL( 3500) »RP (300) 5A(100245)5V145045) sDETeRINLL oRINF eRINP 9» 
5S SWAY (04) sROT( 9204) DEL (S204) 0CD5(53 0452) 1€7(95 04) 1€8(9504) sRINVe 
6 RV(3CO) eVIT(9 204) s VITL (5 604) »C9(9204)4C10(9204) 
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CC 324€ N=1eNAN 

OC 344 N=1.MsM 
LTECAGUNMEN) <EC.0.0 -ORSFYC(MsN) -EGC6020) GO TO 344 
D1I=PAPP(MeNISCAC (MeN) ¥FYC(UMeN) ) 
LECe le Fee Oe 15) Cl TG 710 
02=1218*(1.20-01) 

LEGO sb. 1. O03-.Ge WO. 1A 

WRITE (62222) OleoMeN 
ECRMATCIHO.s *P/EY=" .F10.55"COLUMN* 5215) 
GGaUO me 7a 
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Le OCNULE UMeN) aloe Oe O}) GG TE) 720 

MELE (M,N) =KMP (MSN) #02 
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351 


352 


SEITE 


MLUP (Mh sN)=—-XMF (MSN) *02 

IF (MDLPC(MeN) -LT.0-0) GO IC 740 
MOLP(N»NJ=XMP (M,N) *02 

Geta 41 
MCLP(M oN) =-XMP (MN) ¥DD 

IF (MOUP(M.N) LT.0.2.0) GG TQ 750 
MOUP(M»NJ=XMP(M,N) *¥D2 

GG tO, ¢52 
MCUP(M»eNJ=—-XMF(¥4N)¥D2 
CCNTIALE 

CONTINUE 

CCNTINUE 


CAE CUELATE “Cf. Sl PACTORS 


OC 330 N=14NNN 
CO 3229 M=1.MM 


IF CEC(MsN) «EG 200C LORI XC(MsN)2EQ20-0) GO TO 410 


TF CIC{MsN)~-EQ24) GO TC 327 

IF CJC(MsN)eGEe6) GO TQ 227 

IF (PAFF(MsN) -LE«020) GO TO 328 
IF(ISTAB-EQ.1) GC TO 328 


D1=(SCRTCPAPP (MeNIS(EC(MIN) #IXCOMSN)))) HON) 


Lie CO Wwe «Os S000}. GO) Ta SS 

IF (D1L.eLT¢1.00006AND D1 e-GE202.5000) 
TF (O01 eLT.1.eS000eANDeD1 e-GE.1-0600) 
IF (O01 eLTe2e00006AND2D1 GE 2125000) 
IF (01 wLT*22.50C0eAND.D1-GE e220000) 
ITF (01 eh Te3-.0000 -AND-D1.2GE-2-5000) 
IF (D1 eL Te 3eSO00 CAND 201 -GE2320000) 
IF (D1 elk T0420000 «AND 0D 1 «GE 0345000) 
IF (01 -LT242SO0C0eAND.D1 «-GEe4-0000) 
WRITE (632010)MeN 

TF (Di eLTeS5e00CO.AND 201 0GE 0425000) 
1F (01 2L7T25-5000-.AND.D1 -GE-S.0000) 
IF (D1 LT 62.000 0sAND2D1 -GE2525000) 
IF (O016LTe62.2750-AND.D1 -GE~620000) 
WRITE (622011 )MsN 

GC TO 329 

CC(MsN)=4 -0000—-0 .0668*D1 
SS(MeN)=22000040.0168¥*D01 

GGy TO, 329 
CC(MoN)=3 -9666—0 02034%*(D1I1—C25000) 
SS(MeN)=2200844020520* (01-04-5000) 
GC TG 329 

CC(M,N)=3.8649-0 0-3484%(D01-1-0000) 
SS(MeN)=2203444020624%*(D1—-1-I9000) 
GESTOV S29 
CC(M,N)=3 26907-0 .5092%(01—125000) 
SS(MoN)=2-080E4031426*(01—1-5000) 
GO Te 229 
CC(MsN)=3e43E€1—0 -65€6* (01-22-0000) 
SS(MsN)=2215194022106*(01—-2-0000) 
GC TQ 329 

CCOMsN )=32-0878—-0-9272*(D1-225000) 
SS{(MsN)=2 2257240 -308E#(C1—225000) 
GG 1G 329 
CC(M,N)=2.60242—-122318*(D01—-320000) 
SS(MoN)=22911540 -4638%(01-3-0000) 
GC %10 329 
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SEL 


362 


SES 


JES 


CC(M»N )=2 -0083-1.6704%(01-3.25000) 
SECM oN )=26642440.7226#(01—-345090) 
GO 10 329 

CCOMsN) =121731-243844%(01-4.0000) 
SECMeN)=32003741.2206%(01—-4.0000) 
GC TO 329 

CC{(MeN) =—-020191—-347890*(C1—-4.25000) 


SECM) =3261404223432%(01-4.5000) 
GC TO 329 
CC(MeN) =-12913E-7-5076¥(C1-S.-0000) 


SE(MeN) =4.785645.27146%*(D1—-5S.20000) 
Gc TO 329 

CC(MsR) =—-S26674-29.638%* (01-52-5000) 
SS(MeN) =7264294+272620*(D1I-£.-5000) 
G@ fo 329 

CC(M.N) =—20.636-2827.6%*(TC1—6-0000) 
SS(MeN) =21245342824.8%*(01-620000) 
GC TO 329 

CC(M»Nh)=4-0 

SS(Ms,N)=2-0 

Ge Tay 3s29 

IF (PAPP(MsN)-LEe¢060) GO TO 331 
IFCISTAB2*EQe1) ECC TO 331 


DI=CSCRT(PAPPO(M sNISCECIM»N)*IXCOEMIN)) 2) ¥XC(MON) 


IF(C1eLT.0-.5000) GO TO 3€1 

IF (OL eLTe120000 sANDOL1 e-GE2025000) GO 
IF (OL eL Tel e50004AND2012GE4120000) GU 
LF(D1 eLTe2.0000¢AND 201 «-GE2125000) GO 
IF (O01 eLT*22-5S0006AND2C1 «CE 2220000) GO 
TF (DO1eLT* 32-0000 ¢AND2DO1 eGE2*225000) GO 
IF (O01 eLT 2325000 eAND2D1-2CE 2320000) GO 
IF (D1.-LT*4200004AND201 -GE+345000) GO 
IF (O1-LT204250CO0eANDeD1 -CE 20420000) GO 
WRITE(6,2010)Mo0N 

TE COL eL T25 20060 eAND CD01 2GE 2425000) GO 
LF(D1 LT eSe5O0CO%AND2D12GE 2529000) GO 
IF (OLeLT «620000 eANDeO126GE 2525000) GO 
IF (DLL T26e27E0sAND2D01-2GE2620000) GO 
WRITE(6+2011)MoeN 

GES TOLs69 

CCX(MsN)=4200C0—-C.CE68*DL 
SSX(M»sN)=2200004+020168*D1 

GG TO 369 

CCX (M,N) =3-966 6-0 62034*%*(01—-0-5000) 
SSX(M»N)=2.00644020520% (01-02-5000) 
Go TO 369 

CCK (MN) =328649-045484%(01-120000) 
SSX(MsNI=2-203444020924#(D1-1.0000) 
Gc TO 369 
CCX(Ms,N)=3-6907—025092%(01—-1-5000) 
SSX(MsN)=2.080E€+C.1426*(D1-1.25000) 
GG, 10) 309 

CCX(MsN) =329361—-0265€6*(01—-2.0000) 
SSX(MeN)=2215194022106€%(01—-220000) 
GG 10 369 , 
CCX(M,N)=320878-C.9272*% (01-22-5000) 
SSX(M»N)=22e25724+C308E#(01-225000) 
Go TG 269 

CCOX(MeN} =2-6242—-1.22318%(01-3-0000) 
SSX(MeN)=2-411540 -4E38%(01—-320000) 
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GC 1G 269 
CCOX(MsNI=2-0083-1.6€7064%(01—3-5000) 
SSX(MsN)=24642440.7226#(01-325000) 
GC TO 269 

CCX (MsN)J=121731—-2.3844%*(01-4.0000) 
SSX OM eNI=320037+41.22060%4(01-4.0000) 
GGWTO #369 

CCX (MsN)=—-0 20191-3.7890%*(C1—-4.5000) 
SSX(Ms9N)=32614042.3432%(D1-4.5000) 
GQ TO 369 

CCX(MsN) =-12912€-7.5076%*(01-5.0000) 
SSX(MeNI=4-.785E€4+5.7146%(01-5.0000) 
GO TO 269 

CCX (MeN) =—-S.6674—29 .938%*(C1—-5.5000) 
SSX(M»N)=7264264+27.6€20*(D1-5.5000) 
GG TO 369 
CCX(MsN)=—-20 636-2827 .6*(C1—-6.0000) 
SSX(MeN)=21.45354+2624.8%*(01-6.2.0000) 
CONTINUE 


DI=(SCRTCPAPP(MsNIS(EC LN, N)*IXC(MeN))))*®YCCUMSN) 


IFUOL «eLT-02.5000) GO TO 371 

Le CDEeLT sleOOCOGAND . 01 «GE.0.5000) GO 
IF (O1-LT21.5000-eAND201 -GE21-0000) GO 
PE CD) el «22000006 AND «D1 .GE<1.SC00) GO 
LE(OLeET e2sS0006AND.D1 sGE~-2.0000) GO 
IF (D1 -LT.3.000C0-AND.D1 -GE~225000) GO 
IF (O01 «LT 23250004AND2D1.GE 23.0000) GO 
IF (D1 -LT.4e0000-AND-D1 -GE23-5000) GO 
IF (D1 Lb T04.50C0 eAND2D1-GE 2420000) GO 
WRITE (6+2010)MeN 

TF (D1 eL TeSe00CO CAND 6 D1 0GE 242-5000) GO 
PAGDiteS eS =sSO UO sANDs Ole GE «510 0000) GO 
IF (01 eLTe6.0000eAND.O1 -GE25~25000) GO 
TF(D1eLTe6e27ECe AND D1 -GEe620000) GO 
WRITE (6s201L1)M5N 

GEG 229 

CCY(MsN)=4.0000—-C.0668*D1 
SSY(MsN)J=2.000040.0168*D1 

GC TQ 329 

CCY (MeN) =3~-96E€€—-0.20354*(D1-0.5000) 
SSY(MsN)=2.006440.0520%(01-0.5000) 
GC 10 329 
CCY(M»N)=32.8649—-023484*(01—-1.0000) 
SSY(MsN)=2.0344+0.0924%*(D1—-1.0000) 
GE a0) 229 

CCY(M.N)=3.69C 7—0-8C924*(D1—-1-50C0) 
SSY (MeN) =2.08064061426%*(D01—1-5000) 
GE iG, 229 

CCY(MsN)=32436€1-0 -6566%(01—-2.0000) 
SSY(M5N)=2.15194022106%*(Ci-2.0000) 
GG T0 329 

CCY(MsNI=32087E-C 292724(D01-2.-5000) 
SEY(M»N)=22257240 0 3086%(D01—-2.5000) 
GOsgO. 29 

CCV (MeN) =2.62462—-1.223184(01-3-00C0) 
SSY(MsN)=2.41154+024638%*(01-3.0000) 
Gla LOe 229 

CCY(M.N)=2.0083—1 .6704#(01—3.-5000) 
SSY(MsN)=2.642440.7226*(01—3.5000) 
GE WO 1329 


Site 
373 
374 
37'S 
376 
SSF § 
558 
ss9g 


180 
131 
182 
183 


A-4] 





(DU Othe Ho FT 1) Aehoe eS =0ORds PetteMinge 


Poo, Ay PU) ORE OE E+ Oe LOL Ee Cay epee. 


(2900. o~ (710 PRUE OE SMe (GST US 


Logdde +he - ire Gils OEP Hie habe Me 


9030) aie re 32 ye te = (Ay axD2 
§ SoOO.: Aveaere Ci fe Soe Pera, M ERee 


idea’. #4 356 406-01 00,4 fay WIAD 
0600s t+ (0 19US9 9509S Gade eae 
































‘ : > v 7 
- — I a 
ds a n| a ~ 
‘Set Bt 


Lea obo Dt he LOMO Sami 
Owe Ge, aa : 
9 
et PO) M620S8e 19 TORO. Chas MRS t 
Fat .0F Jd: “=. 
eo 7e+¢=' \* O69 Et tre Ost ey ITED. ovr. ; 


eae or ag 
St, OF OO 


POE OT D2 = 
pOyVVlw ra 8 6s t 545 5te.c = y SIR 2 t ‘ 


HUT THD 
Wee) TERE PLI PT Bee ot eke 
ee | on Ve SO00R eDs Le F ¢oydt 

(VOU 2.% > THe 9 eGA. OUND. Ts Pty (CITY 


(roe 'fe4 190) DAN DOOR a he toes enae 
(bONS + He J2 sh FoeeeGaGo ode Ty BOR 
im iy Sow 30 Hie Ot Ne ODOM s be Tide BARRE 
SAWil «Sa Gee De GAAeOS0G4Es tas SESE = 


LOU Ce De 1G OA GOON Te Ole Tae 


(NG Deel s 200 SO p dee OCOD sO. TUs 1 eal 
tu; Oia be Tap (Os GGk ORES OL EES 7 
| Ve Ae Or esd IT Taw 
t' He Be TMs (Ye U4 PPO. Be Te Gc? af 
‘ ly } 4Get ) EAA CODE +O T4100 
ii .. bh. Ob- is Give COUCOrHe TUNG 0US 


1 OUGl «Be a0e (Cage SETS eRe tee 
eS 1105-5) St 18e 
wet Df. + 
1488905090090 ym Cty Mae - 

hl adidade 0 oP OES, Ci alae 

~ SL OP-3R- >; 

i99002.0—7 obanehhaae SUC Che WIV DD 7 
(oniye: 0-1 Os 0UShis ASUS Gate neaE . 


fe 
. 


a 


- - ese ons 
(OOO%. (-1078ebeh eee, tO ae 
(oe ee Priteeet esis cect n ih. s 

e6E OF, 38, 


1U0O. 1-10) OED <8 Gerke IM 
(0@ba. 7 7-(O1P Shs COSORSsSea eee 
(09a eta ngaaa sina 
eet 









1e1 


1e3 


140 


141 


CCV(MsN)=101731-2.3844%(0D1-4.0000) 
SSY¥(M»N)=3-003741.2206*(01—-4.20000) 
Ger tor 329 

CCY (MeN) =—-0.0191-34-7890*{(C1—-4-5000) 
SSY(M»N)=3.614042.3432%(01—-4.5000) 
GG TO 329 

CCY(MeN) =—-12912€—-725076*(01-—S.20000) 
SSV(MsNI=4278S5SE4+E-714E%(01-S 0000) 
GG stGs 329 

CCY (MeN I=—-5 -€E€ 74-29 693 E*(DI-5-S5000) 
SSY(M 0N)=7.64294272620*(01—-5.25000) 
GC TO 329 

CCY(MsN}=—20 .636€—-28272E6E%(01-€20000) 
SSY(MeN)=21.45342824.84%(01—-6.0000) 
6G 70" 329 

CCX (MsN)=4.20 

SSX (MeN) =2.20 

SSY(MeN)=2-0 

CCY (M,N)J=4.-0 

GEO), 329 

CC(MsN)I=0040 

SS(M.N)=020 


CCNTINUE 
CCNTINUE 
FCRMAT (CIHOs3OHNECATIVE STIFFNESS COLUMN 5 1361H»st3) 
FORMAT(CIHOs,3OHIAFINITE STIFFNESS COLUMN, I351HKe512) 


A-42 


EVALUATE COEFFICIENTS CF SLOPE-OEFLECTION EQUATIONS WHICH ARE DEPENDENT 


CN AXIAL LOAD 


COC 149 M=1.MM 

DC 41SEC N=14NNN 

IFC IC(MsN)-EQe1) GO TQ 140 
IF( JSC(MsN)-EGe2) GO TO 141 
IF(JC(MsN)-E0Q23) GO TO 142 
IFC UC(MsN)2EQ24) GO TO 143 
IFC JC(MeN) EQS) GO TO 144 
TFC UC(MSNICEQeE) GC TC 145 
IFC JC(M*N)2EQe-7) CG TC 146 
IFCSC(MeN) -EQe3) GC TO 147 
D1I=EC(MsN)*IXCOMsNISHOIN) 
D2=D1/H(N) 
CLI(MsNJ=CC(MsN) #01 
CL2(MsN)=SS(MoeN) #01 
CL3{MsNJ=(CC(MSNI#FSSOMIN))*D2 
CL5(M,N}=0-20 
CUL(MsN)=CL2CMe,N) 
CL2(MsN)=CLICMsN? 
CLI(MsN)J=CL3I(MSN) 
CUS(MsN)=0-0 

GG TG 150 

DI=EC (MeN) *IXCO(MSN) SHOR) 
OZ=O01/F(N) 
D3=(CCIMseN)¥CC(MeN)—-SS(MoN)*SS(MSNIISCCOMON)D 
CLI(MseN)=020 

CL2(MsN)=0.20 

CL3(M,5N)=020 
CLS(MsN)=YLUP(MsN) 
CLICM.eN)=020 
CL2(M.N)=D3FD1 
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A-43 


CL3(MsN )=D03*E2 
CUS (MeN) =C0SS(OM »NISCCOMeN) D¥MLUF (MON) 

GE” To Tso 

DI=EC(MsN)¥IXC(MeNISH(N) 

D2=DO1/H(N) 

O3=(CCOMsNIFCC(MeNI-SS( MeN) *SS(MON))SCCOIMSN) 

CL1(M.N)=03401 

CL2(M,N)=0.0 

CL3(MeN)=N3*D2 

CLOCMeNI=(SS(MONISCC(MSN) ) ¥MULP (MeN) 

CL1(MsN)=0.0 

CU2(M,N)=0.0 

CU3(M»NX)=020 
CULS(Ms»N)=MULP(M.N) 

GGa GO is0 

DI=EC(MN)FIXC(M INI SXCEIMON) 

O2=D1/4XC(MwN) 

D2=EC(MseNYKIXC(MeRISYC(M ON) 

D4=D3/7YC(MsN) 

DS=(CCXCMsN) *COX (MyN)—-SSX (MIN) ¥SSX(MIN))/SCCX(MLN) 

O6={(CCTCMsN) *¥CCY (Ms N)—SSY (Mp N)¥SSY(MoN) )SCCY(MN) 

D7=DE4D02 

C8=D6+*C4 

B1l=D8/( (DB—-FAFP (MSN) )*XCIMNSN) +(07-PAPP(MIN)) #YC(MeN) D 

B2=D7/((D38—PAPP(M»N)) ¥XC (MINI +(07—PAPP(MeN))*¥YC(MSN) ) 

B3J=1-20-B81*XC(MsN) 

B4=1e0—-B2*YC( Msn) 

CL1(MeN)=B4*054#01 

CL2(MeN )=B2¥*XC(MN)*¥D64D3 

CL3(M.N)=B82*XC(M»N)#(D8—PAFP(MSN) ) 

CLS (MaN)=B4¥*(SSX(MeNISCCX(M2N) ) *¥MCLP(MINI#+62*XC(MsN)I*(SSY(MIN)I/SCCY 
1(MeN) )*NOUP (MeN) #B2#XC( M,N) ¥YMDUP (MON )—-E24*YC (MON) ¥MDLP(M.N) 
CLI (MeN )=BL*YC(M »N) ¥O05*D1 
CL2(M.N)=B3¥*CE*DZ 
CUZ(MsN)=BIL*¥YC(M,N)*(D7—-PAPP(MSN)) 

CUS(M »N)=B3*(SSY(MsN)SCCY(MsaN) ) *¥MOUP(MsN)FB1L *¥YC (MON) ®(SSX(MSN)I/SCCX 

(MeN) )*MDLP(M2N)—-B1*XC( MON) XMOUP(MON)4+B1 ¥*¥YC( MeN) X¥MOLP(MSN) 
MO(N»N)=MOLP(MsN) 

Se aie? MSo) 

CL1(MsN)=020 
CL2(Ms,N)=0-20 
CL3(MsN)=0.20 
CLS(M»e,N)=MLUP(MSN) 

CU1(M»N)=020 

CU2(MsN)=0-0 

CL3{MsN)=0-20 

CUS(MeN)=MULP(MsN) 

GGu TOR 50 

D1=CCCCYCMsN) ECCY (MaNI—-SSY (MeN) *¥SSY (MON) DZCCY (MeN) DFECOMe NI FIXC(M, 
INJ/YC(MeN) 

D2=PAFP(MeN)*(1eC#YC(MsN)/XC(MoN)) 

D3=D1/YC(M,N) 
8S=D2/ (02-03) 

B6=1.0-85 
CLI(M,N)=0.0 
CL2(M.N)=0-0 
CLI(M,N)=02-0 
CLS(MeN)=MLUP(MSN) 

CU1L{M.,N)=0-0 
CL2A(M.N)I=B5*O01 
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A-44 


CLICMsN J =—-BH*E (MIN) EYCOMSN)SXCOUMSND 
CUS (MIN) =064 (CYC (MsN)/SXC(MON) ) #(MCLPO(MON) t+MLUP( MeN) )—NDUP (M,N) ) 485 
P*(SSY (MsNI/SCCY (MeN) )¥MDUP(M aN) 
MC(MeR)=NOLP( M,N) 
Garon 50 
146 DI=(CCCXOCMON) ¥COX(MONI-SSX(M9N) SSX (MEN) DAZCCX (MON) ) ¥EC( MON) FILXCOMS 
INJAXC(MSN) 
OZ=CisSXC(MNY 
DI=PAPP(MeN)¥(1.0#XC(MsNISYC(MeN) ) 
B7=C3/(03—-D2) 
B8=1.C-87 
CL1I(M»N)=87*D1 
CL2(MsN)=0.0 
CL3 (MeN) =—-BS*(XC(MsNISYC(M9N) ) *PAPP (MeN) 
CLOCM»eN)=BS*((XCOMsNISYC( MON) )*¥{NULP( MON) *tMOUP( MON) )—MOLP(M,N) ) +87 
1*(SSX(M»sN)/CCX(MsN) )¥MDOLE(MSN) 
CLI(MsN)=020 
CL2(M»N)=0.20 
CU3Z({M,N)=0.0 
MO(MsN)=MOLE(MSN) 
GG" tO Fso 
147 CL1(M»sN)=020 
CL2(MsN)=0-0 
CLI(MsN)=0.20 
CLS (MeN)J=MLUP(M,N) 
CLI{M.sN)=020 
CL2e(MsN)=0-20 
CU3(MsN)=0.20 
CLS(M.~NJ=MULP(M SN) 
MO(MsN)=MOLP(MyN) 
150 CCNTINUE 
149 CCNTINVE 
RETURN 
ENO 
SLEROLTINE EEL 
CGMMOCN/ZAREAILZS AC(G304).1XG(9104)5Z2XG(G504) sFYG(9,04) ,EG(9,04)¢ 
1 OLDES (9,04) sLLCES(9, 04) 5LG(9,04)5W(9,04) sVWA(9204),VWSB(9,04) » 
2 MFAB(9.04) »MFBA(9304) »MFCA(9 304) »sMFCB(9 504) »MAX(9304) eMBY(G204)>o 
3 VWAL (9204) »VWAL (9s04)5CA1(9304)5CA2(9504) 5CA3( 9404) sCAS(G9204) 
4 CA6(G 204) 5CB1(9 504)5CB82(9,04) .CH3(9304) »-CB85(9,04) ,CBE(9,04), 
S MBAP(9304) sMABP(G304) sMCAP(G304) sMCBP( 9,04) XG(9,04)4YG{(Gs04)>» 
& VA(9s04) .V8(9.04) »MA(9 104) »MB(S5 204) +RABP(9.04) »sRBAP(G204)6 
7 RCAP(9 504) »DELC(9304) »sRBAFL(9504) sRCAPL (9204) sRABPL(9,04) 
COMMCON/SAREA2S AC(G204)s1XC(9s04) 6 ZXC(9304) »RXC( 9004) pWO(9s04) 0 
lL FYC(S$:04).EC(9.04) .CC(9»64)555(9 204) «COX( 9,04) 55SX(9,04) 5 
2 CCY(G 204) -SSYV(G 504) sCL1(9 5,04) «CL 2(9,04) sCL3(9504) sCL5(9,04)e 
3 CU1(Ss04) »CU2(9 1,04) CU3(9104) »sCUS( 9204) MD(9,04) »MC(9204)-e 
4 MULF(G,04) sMLLP(9 04%) sMDLP( 9304) sMDUP(94045) »XC(G504) e¥C(9s04)e 
S XMP(G.04)5VL(9204) 2VU(G104) eML(G.04) oMU(9104) sF#LUP(9,04) 6 
6 FULP(9,04) sRCLF (9904) —DELD(G.04) sL(9)H(04) .K(9)sSUMV(G) -B( 100) 
COMHCRSARE ASS AEB(G 50452) +RXE(910452)sFYB(9.0452) ,ER( 920402), 
1 LE0C9.0462) .CO1(5,0462) 6C02(5.,0452) sC03(9r04 52) sCD04(G,0452)>, 
2 €C2(19 404) »PCR(9 104 52) sFB(9 20442) oF BP(920402) sFEX(920402) eX(100)e 
3 FOES(04) eVDES(9+04) sFOES(9) »F (04) 6P (9,04) ePAPP(9,04) sVINCR(DLO4)»® 
4 FF (3CO) RLL (300) se RPC 300) 2A( 100545) 2V(6 45245) eDET eRINLL eRINF op RINPS 
S SWAY (04) sROT(9 604) ,0EL (9204) ,€05(9204e2)207(9,04).C8(9,04) sRINVe 
GO RV(3C0) sVITI9 204%) eVITL (5 204) 2€9(9204)4C10(9.04) 
COMMOCNSAREAGS 4JC09 204) 25E(9s 04) 252 (920402) eINDGoMMeNA oMNMeNANoIL © 
Tl NASNRE SNCYCeINOSG pL LL eAL2IKO2(9)- LELAST»NLAST s+ LAREAs INOs IREV,IREV2. 
2 TIS FACS E106 Ut le Li2s JGINGS s C4) sJCE CG. O4)ic JBCO9. 04652) Lae hl Oelts 


asa tee OPEV 2a 0.0 bey v Dy L400? 


a* i 
® J 
* 
it 
4 
‘ 
» 
? va 
) 
= 
~ 
' ~ ~ 
~~ 
i 
‘ 
i 
¥ § 
e 
1 
1 
7 1 } 4 
i : 
7 - e tt ‘ t 
, ‘ . 
“aT 7. ‘ ‘ ne mes 
PoP Vet PRU Se tae ho ew 5 7m 





‘Ue Lavteah a, 6 Gx bOs eran Vn ea 













i ee 
4 _e., 


> - 7 
; . _ ew » 
# Li - iW 7 
, ty, 
; iT = 
7 i ot a 
* 


cabarge reed, Apeeiiathed 
* 8" ewe aint setertasSins tae 
M8 $4 AEST DPA OM? 

( My 89M. awe As! 

54 >a% » 88k ae 


, Cute TKD Se est) 
7 . 
s i Fe } an 
b4o 4988 — 


tay )SeeOc 1) ele aeAS 
re0-£0 31500" 


ied Yarden» 















































a om : 


a 4 | patel ae 
: nd 0+ Ov4 IES 
Va2eg Less) Per waMnnt HM BEAD 
L4Ase@1>9St 200 O24 ed aed Sa wits> 
; eR ea et tt 
fhieOe (ate daD 
q.9F We MFSu> 
Ge Os ihe 4itv> ~ 
(4~™)* — 4108 = 
“OF aD, 
O.02t ar) anny 
‘ Ocbeta Med. 
Geko tm MEE 
7 PRTC ey? » Uae 
hetaemy isa 
apie “4 )G09 
J 7 / O.OnteeM iw 
(Ay 475 Ae lA, 91 8e 
CH @ AME ( 4M 
r ' @yattwoo 
" Su 27 THIS 
aguT aa 
\ ge. 
i [535 DAT" sJORNIE 
H i oe. i 7336 a3 > waned 7 
le CHO pe Re fiet Gee 2 ye , 
7 LTR ALAA ok jer 9) nA Se 
x CL Gav, (ah. OT sev = 
rein Titer ot. 
3 se -@ 1404 pig heryets wage f e 
. (h0s 04 Allg EAB eta Che OT 
UT Eiy CHO) DRE » fad yeh NA3 Ae 
i) St) ei Pee) BF Senge ei 


{Lea 


ee Pe has Piet Oyo) 
Leds OF FIR. FhOy pave fa COORD 


VI LIG4 y CBT OPE Men COM aero 
Le Oe Os yH> 64048}. ‘. C¥Oy RVe 


oO FG IMGs { FO wy VEIN vee aes 


Det S 6s "i sO v4aae seis 






mera 6¢%se BOreLA aehe 
mess ay eore ow er eeees 
de le eGo tTVets Ph OO . a2 ‘ 


A-45 


REAL MAeSMBs ML aMU cl ITXC, IXGeLLDES AL Gol By MF BA sMFAPsMFCAy»MFCP»MAX, 
IMBY «MEAP »MACP »MCAP sMCEP»MULPs»MLUF s¥OLP»MDOUP,K»MCeNMD 
REAL *€@ COLUMN,BFACE,GIRCER, IDENT1L» LOENT2,ICENT3.,I10VENT4.,{10ENTS 


¢ 
(é FORMULATE ECUILIPRILM EGCLATICNS 
Cc 
IFCINC6G-EGQ.e2) GO TG 304 
WRITE(6G.3001) 
3001 FORMAT (1HO, *CCLUMN/IJOINT COLUMN AX{fAL LOAD APPE TED, SJOINT & 


1OAD LGAD FACTOR® ) 
CC 302 M=1.MM 
OC 302 N=1eNN 
WRITE (623000) MeN sPAPP (MeN) sVITI(M ON) RVC IL) 
3000 BORMATIC) HH) siSsfSelOXs EI s4e12X%sF 1005s 1OXsF 10.5) 
3C2 CEN DTEUNGE 
303 CONTINUE 
304 JT=29NM 41 
JJ=3*NM 41 
JK=JJ +1 
NA=NANR¥IST4MM 
N@=2* Jl 
Re T3206 (I=) .NB 
DC JOS 1=15NA 
ACT »J)=0.0 
305 CCNTINUE 
306 CONTINUE 


MCMENT EQUATICNS 


Onan 


OC 110 M=1.,YM 
A(Ms 1 )=—CL1(M,1)—K{(M) 
A(MsMN4+2—-M)=CL2I(Mo1) 
ACM »sMM#tM41)=—-CL2(Mo1) 
B(M)=CLS(Ms1) 
110 CCNTINUE 
LEIGNN se Geic.) JGG ST Gy hat 
OC 130 N=2.NNN 
IF(MM.ECe2) GC TC 121 
DG 120 M=2,MMM 
I=N¥JI-JK+2*M 
EE=O0eS*UC(MSN)I/SLE(MSN) 
CZ=O6f*WC(MeN)/LG(M—1 oN) 
AA=1.0+88 
O0O0=1-C+#+CZ 
A( Tel J=—(CAA¥CAL( NN) C28 FCEB1 (MIN) 4FCZ¥*¥CA2(M—126N)4+00*CB2(M—15N) 
1 +#+CL1l(Ms»N)4+CUZ(M,N—-1)) 
ACI .2)=—-(AA¥CAZ (MN) tBB*CES(MSNI—CZ¥*¥CAS3(M—14N)—-DO*¥CB3(M—-14N)) 
ACT s3)=—CAA¥CA2(MZN)4+EU504*CB2(MoN) ) 
A(144)=AA¥CAZB (MN) FEEX*CEZ(MON) 
A(I.2*(MM—M)+3)=CL3(MsN) 
ACI .2*MM#2)=—CL2(M,N) ~ 
BCL )=SA4CAS (MeN) FE 8B¥CES (MeN) tCZ*¥CAS(M—-15N)4+00*CES5(M—19N) 
1-4CL5(MyN) FCUSCM oN—-1) tO0S#EWCK( MeN) #(VWE CM-L »>NI-VWA(MN)) 
120 CCNTIAUVE 
1 Gres | f[=N*JI—JK+2 
BB=O0ef%*WCC1»sNI/JLG(1+N) 
AA=1.20+23 
ACY, 13=—-AA*CA101 -.NJ—BE*CEl C1 oN) —CLECIGN)—CUR (1S N—-1) 
A(I.3)=—-AA*¥CAZ(1,N)-BEB*CB2(15N) 
ACT 24 )=AA¥CAZ(CITsNIPEBFACEI( ION) 
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A-46 


ACT 22)=—-Al124) 

ACL »s2*¥MM#1)=CL3(1,N) 

ACT »24NN4F2)=-CLZ(14N) 

ECL )=AASCAS (1 oN) 8B *CBES(1,>N)FCLS(C19N)+CUS(1,N—-1) 
1 -O.5#WC(LeN)*¥VWACION) 

I=N*XJI—-JSK+2*MN 

CZ=O0ef*¥WC(MMeNISLECMMMON) 

CC=120+CZ 

A(1Le¢1)=—-CZ*CA2Z2(MM—1eN)—-DO#CB2(M¥—1 »>NI-CLLOMMsN)—-CU2(MM,N—1 ) 
AC 122 )=CZ*CA3Z(MM—1.N)+4+00*CB3(MM—1.N) 

ACT. s3=CLICNM ss N) 

ACI ,24MM+2)=—-CL2(MMoN) 

BCI )=CZ¥CA5S(MN—-15N)400*CBES(MM—1L9N)*#CLS(MM9N)4+CUS(MM sN—-1) 
1 40.5*WC(MM,N) ¥VWE(MM—1LN) 

CCNTINUE 

IF(NMeEG.~2) GO TC 141 

DC 140 M=2.MMM 

I=NN¥®JI-JK+2*M 

BE=0.5¥*WC(MsNN)/SLGEC(MANN) 

CZ=04F¥*WC(M»sNNYSLG(M—1,NN) 

AA=1.20+8B 

OO=1-0+CZ 

ACI 21 )=—-AA¥CA1 (M»NN )—BBFCE1] (Ma NN )—-CZ¥CA2(M—14NN )—-OD*CB2(M—15NN) 
1 —CU2(MsNNN) 
A(1s2)=—-AA¥CAS(MsNN)—BB¥*¥CE3(MasNN)#CZ*CA3(M—12NN)#D0¥*¥CB3(M-15NN) , 
ACI» 3)=—-AA*®CA2(K NN )-EB*¥CB2(MsNN) 

A(1 +4 )=AA*CA3Z(M AN) +BE*¥CB2(M2NN) 

BCI )=AA*CAS(M eNN )+8B*CES(M2NN)4CZ¥*CAS (M—1)5NN) 400¥*CBS(M—19NN) 
1 +CUS(MsNN—1)40-65*WC(MeNN) *&(VWB(N—1L5NN)-VWACMONN) ) 

CCNTINUE 

I=NN%IJI-JK +2 

EB=O0-.S#UC(LsNNISLGC EAN) 

AA=1-0+BB 

A(Is1)=—-AA*¥CA1(1 NN )—-BE XCEL (1 eNN)—-CU2C 1 eNNN)D 

A( 123) =—-AA*CA2Z2(1 »NN)—-BE*CB2(1 NN) 

ACI s4}=AA¥CAZ(1L NN) 48L4CBI2C19NN) 

A(1Ts2)=-ACI 94) 

ECL )=AA*KCAS( 1 eNN)F+BE*CBS CL» NN) FCUSC 1» NNNI—O¢S¥*WCC Ls NN)*VWACL NN) 
IT=NN¥JI-JKF2*MM 

CZ=OeEXWCKMM~NA)SLG(MNM SAN) 

OC=14C+CZ 

ACL el )=-CZ¥CAZCMNM NN )—-DO¥CB2(MMMsNN I—CU2(MMoNNN) 

A( 1,2) =CZ¥CAZ(MMY »NN)40D0*C83 (MMM oNN)D 

BCL) =CZ*CAS (MMM ONN) FD08CBE( MMM NN FCUSLMMS NNN) £0 oS ¥WCCMMS NN) ¥VWO(M 


1NMsNN) 
VERTICAL FORCE EGUATIONS 


[F(NNeFGe2) GU TC l17t 

OC 170 N=2sNNN 

IFCNMeEQe2) GC TC 161 

OC 160 M=2eMMM 

I=N¥JI-JJt2*M 

A(Lel) =—-(CA3(N—1 oN) FCES3(N—1L oN) ISLG(H—19NI—(CAZOMIN) HCB3 (MeN) DZLGCM 


Le NJ—CC2(M2N)—CC2(M pN—1LI-COS (MEL oN—-L el )—CO4(M—1e¢N-192)-CO4(MsNold 
2-CCO4(MoeNe2) 

ACT «2).=—(CaA2CUsé oN) FCB2(NZN)ISLECCMN) 

ACL e3)=(CASOMON) FCB 3( MeN) D/LG(M OND 

ACLs 24*(NM=M) #2 2=CO1(MeNo lL -COL(MeNo 2) 

ACLs 2#MN+2)=CC2(M oN) 
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A-47 


ACT »s2*Mvry=CO4(Moho1) 

A(Le24#¥rt4)=CO4(M,NI2?) 

BCT Q==(CAS(M—1 NV FCBS(M—1 IN) DZLG(M—15N)4+(CAS(M,N)+CBS(MIN))/LG(MIN 
PJ—COSCMELaN—1 sb J—COACM— Ws N=lisn2 CDS (Ms Nel DreCOStMs Nig} 
2 —~VIT(MsN) —VWACM»N)I—-VWB(N—1 oN) 

CCNTINUE 

I=N*JI-—JJ+2 

ACT elt I=—CCAS(CL aNI+CBSC LT sNISEGCL oN) —CC2(1sNJ—CCA2l1sN-1) 
1-CO4(2eN-1,1)I-CC4(12Nd2) f 

Clive Y=— CEA2Z CTL aN COS CAN /SECEYAN) 

ACIS S3J=CEAS CI EN) 4€CB 3 I,N) VAL GCISN) 

ACT »s2*MM)=—-CCO1(1.N,2) 

ACT »,2#MMN42)=CC2(1,N) 

ACT »24MM+44)=CO4(1sN92) 

BCT I=(CASCLINIFCBES CIN) DALEC IL ®NI—CO30¥2esN-151)#+CO3( 1+Ne2) 

1 SSL AIS) —-VWA(1»N) 

I=N*#JI-JJ+2*MM 

ACT s1)=—(CA3(¥NMAN) +CB3(MMMIN) DSLGOMMMSN)—CC2(MM,N)—-CC2(MM4N-1) 
1—CO4( MMM sN—152)-CO4(MMeN ol D 

A(Ts,2)=CDI(MM.No1) 

ACT s2*MM#t2)=CC2(NMegN) 

ACT s2*MM)=CO4(MM.No1) 

BCL )=—(CASCMMN ON )+4+CBS(MMMSN) )/LG (MAM SN)—CO2(MMM,N—-1¢2)4+CD3(MMeNol d 
1 —-VJIT(MM4N) —VWE(MMM»N) 

CONTINUE 

TE(MM.EQe2) GO FC 18! 

OC 180 M=2,NMM 

I=NN*X¥JI-JJ+24M 

A(T 91) =—(CA3CN~1 5.NN)4+CB3(M—14NN) DAL GOM—-1 NN )—(CA2(42NN) #FCB3(MSNN) ) 
1/LG(MeNNI—CC2CMsNAN)—-CO4(M41 »NNNG1I—CO4(M—-1 »NNNG2) 

AC 122 )=—-(CA2(M,NN)FCB2(MSNN)I/JLG(MONN) 

ACT »s3)=(CA3(MeNN)*#CB3(M5NN)IV/SLG(MSNN) 
B(1)=—-(CAS(M—-15,NN)4+CBS(M—15NN) )/SLG(M—1eNN) (CAS (M2NN)*+CRS(MZNN) ZL 


I1G(MsNN )Y—-—CO3(M41,NNN21)—-CD3(M—-1 sNNNO2) —VJT{M,NN) —VWA(MsNN) 
2—VW8(N—1sNNI—-RPCIL) *PODES(M) 
CENT INVE 


I=NN* JI-JJ+2 

A(T ,1)=~-(CA3(128N)4FCB3(19NN)IVSLECCL2NNI—-CC2C1sNNN I-CO4( 25NNN2 1) 
ACT .2)=—-(CA2(1 »oNNI4+CB2(015NN))/LGC INN) 

ACT 23)=(CAS(1eNN)4+CB3(015NN))SLGCLSNN) 

BCT I=(CASU1 NN) #€CBS5(1—NN) )/LGC1eNNI—-CO302 sNNNot ) 
1 —VWA(C1L»eNN)-RPCIL)*PDES(1) —-VITCLeNN) 

I=NN¥JI-JJ+2*M 
A(Is1)=—-(CAZ(NMMsNN)4CB3CNMMONN) )SLGIYMM INN) -—CC2 (MMS4NNN)—CO4 (MMM 
1 NNN»2) 

BCI )=—(CCAS( MBN AR) FCBECHNMSNN) DSZLE (MMM SNNI—CO3BC MMM SNNNG 2) 

1 —VJIT(MM,NN) —VWB(MMYMsNN)—-RP(IL) ®POES(MM) 


SHEAR EGUATICNS 


TEENNSECe2) CE Te 24k 

OC 240 N=2eNNN 

I=N*JI-JJ 

Z1=0.0 

Z4=02C€ 

Z7=020 

LEO ble we G65) CO mG nace 

CC 210 M=1,éM 

ZI=Z14(PAPP(M,K )—-CL3O(MeN )—-CUS(MAN) DJZH(N) +( PAPP(MsN—1)—-CL3(MoN-1) 
1 —-CU3(M»N-1))7F(A-1) 
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2239 
231 


240 
241 


Z24=244 (CL 3A(MsN) tCUSCMeNI—PAPP (MeN) SHIN) 
Z7=Z74A(CLOCMeN)D 4FCUS(M ON) DAH(N)—(CLS(CMoN-1)4+CUS(MSN-1))/H(N-1) 
CCNTINUE 

Geetors25 

CC S2€ M=1eN 

Z1I=Z1I—-(C CLE ( MeN) FCUS(M oN) SHIN) —(CCL30MeaN—-1L) 4 CUS (MeN-1) SHIN) 
Z4=244(CLI(MsN)4CUZB (MSN) ISHN) 

Z7=Z7H(CLSCMseN) tCUS(MeN) DZKON)—( CLS (UM pN-1) #CUS(M2N—-1) )/ZHON-1) 
CCNTINULE 

Z2=0.0 

ZS=0eC 

Z@=0.0 

CC 211 M=1,MMM 

Z2=Z2-CO2(MeNeo2)—-CO2(MeNK-1 22?) 

ZS=25#CO2(UAwN22) 

Z8=Z8-COS(MeNo2)4COS(M peK—-1 92) 

CCNTINUE 

23=0.0 

ZE=0-0 

ZS=0.0 

OC 212 M=2.,MM 

Z23=Z3—CD2(MsNol1 )—-CO2(M,N—-151) 

Z6=Z6+CD2(M»Nol)d 

ZG=29-CCOS(MsK—-L0o1l)+COS(MsNo1) 

CCNTIRVLE 

ACTs P=Z14Z2+23 

ACI e2*MM¢Mt2)=Z244+725+2Z6 

BC 1)=27+Z28+29--F(N) 

OC 220 M=1eMM 

ACL e23M)= (CU2(M »N—-1)4CL20M.N—-1))7ZHON—-1LI—CCLELC MeN) tCULI MSN) SHON) 
ACL e2* (MMM) 41 )=-(CL20M9N) #CU2(M ON) IZHIN) 
CCNTINUE y 

IF(MM.EQe2) GO TC 231 

DQ 230 M=2,MMM 

ACLs 2*Mt1L)=CDL(MoNoZI—COL(MeNo lt J—COL(Mt1sN—-1 91) +CO1(M—21 »N-1 02) 
ACL s2%(MM4M) #2)=COL(Mt1sNo1l)-CD1(M—19No2) 
CCNTIANUE 

A(Ise3)=CO1L(1»N22)-CO1(2sN-141) 

ACL s24MMF1)=CO1( MMM »N—-1-¢2)—-CO1L(MMsNo 1) 

ACT s24#MM4t4)=CDO1(20No1) 

A(1242MM42)=—CCIL(MMMsNo2) 

CCNTIALE 

I=NN*IJI-JJ 

Z1=0.0 

Z24=0-0 

LE C12.E0.—5), Ge, 10 S34 

OC 250 M=1,MM 

Z1=Z1+(PAPPO(M SAKA )—CL3 (Me ANN )—-CUS(M>NNN) ZR ONNN) 
Z4=2Z4—(CLS(MsNNK)4FCUS( Me NNN))ZHINNN)D 

CCNTIKRUE 

GGG, S35 

OC S3E M=1.MM 

Z1=Z1—-—( CL 3 (Ms NNK)FCUSB(MeNNN) DZHONRNND 
24=Z2Z4-(CLSE(MsANK DY FCUS(MeNAN) DZHOINAND 

CCNTINUE 

Z2=0-0 

ZE=06-C 

CC 252 M=1.MM 

Z2=72-CCO2 0M oNND 02) 

ZE=Z5+COS(MseNAN 02) 
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CCNTIANUE 

Z23=0.0 

ZE=0.0 

DC 2£%4 M=2 Ni 

Z2=Z23-CC2CMeKNNO1) 

Z6=Z6—CUS(MesNNNol ) 

CCNTIALE 

A(TelI=Z14+Z2+23 

BCL) =244+2542726—-F (NN) 

OC 26C N=1,_,'M 

ACT ,2*M)=(CU2(M2NNN) 4CL2E(MeNNN))SHONNN) 

CONTIRUE 
LE CMM .EQL 2). GE TE 266 

DC 265 M=2,MMM 

A(T ,24M4#1)=CODN1 (¥—-1,NNN5V2)-COL(M*#LSNNNO1) 

CENTENUE 

ACh. 3) =—COL C2 sNNN 5 1) 

ACT «¢2*MM41L)=COL(NMM,NANG2) 

RETURN 

END 

SLBROGLTINE SOLVE 

COMMCKR/SAREAILZS AGC(9+04)91XG(9204) »2ZXG(9904) sFYG(9 104) e-EG( 9304) 0 
OCLCES (9.04) sLLDES(9,04).LG(9s04) W(9 204) »pVWA(9 504). VW8(9204) » 
NFAB(9 04) »MFBA(9 504) sMFCA(9s04) sMFCE(9404) »MAX(9304)+MBY(9204) 0 
VWAL (9204) sV¥%¥GBL (9204) »CA1L(9104) »CA2(9504) -CA3(9 504) sCAS5(9204) 
CAC(9 404) 2CB1(S 604) 2C82(9304) 5CB3(9,04) 1CB85(9504) -CKHE(9504) 5 
MBAP (9304) »sMABFE(9,04) sMCAP (9104) sMCBP(9 204) XC(9504)2YC(9,04)—e 
VA(9 204) .V8(S 204) +MA(9 304) »%B(S204) »RABP(9104) sRBAF(G04) 6 
RCAP (9,04) »-DELC (9204) »sRBAPL(9404) »RCAPL (9504) »RABPL( 9504) 

COMMOCRSAREA2ZS ACL(9 404) 41 XC(9504) 3 ZXC(9 104) »sRXC(9 504) »WC(9D204) >» 
FYC (S204) 0EC(9 904) 2€C( 9204) »SS(G504) 3CCX(9304) eSSX(9204) 6 
CCY(S 204) eSSY(9 204) sCL1 (9204) sCL2(9404) »CL3(9,04),CLE(G C4) oe 
CUL(S 2 C4) »CUZ2(9 204) sCU3(9 904) sCUS(9e2C4) »MD0(9204)2NC(G204) 0 
MULP (9,04) sMLUF (9504) »sMOLP(9204) sMDUF(9 204) +XC(9204) »YC(G204)>» 
XMP (5.04) 9VL(9 504) sVUL9 504) »ML(9 204) »MU(9 504) +RLUP(9204) 6 
RULP 19,04) »RDLP(9+04) »DELD( 9504) sh (9) sH(04) K(9) eSUMV(9) »B( 100) 

COMMCASAREASS AE(9 0402) 2RXB(920452) eFYB(920402) 2ES(G10422) 

LB(9 20452) 2C€D01(910492) 2€02(9 204 92) 1€D3 (9304 02) 2€04(920422)> 

CC2 (9104) oe PCR(9 10402) 5 FB(900452) 0FBP( 990452) sFBX(940402) eX(100)% 
FDES (04) »VDES(9 104) e PDES (9) sF (04) 5P(9904) sPAPP (9504). VINCR(FD+04) 6 
RF (300) »RLL( 3200) eRP( 300) sA(100 545) 9V (45 945) »DET eRINALL»RINFeRINPS® 
SWAY (04) 5RUT(9 204) sDEL (9204) 2CO05(92 0402) 2C7(9304) 0C8(9104) »sRENVS 
RWOSEO) sVITC9 504) oe VITE C9 vO0S) 4909s 04's CLOCIs104) 

COMMONSAREAGS JIC(G204)5IG(9.04) 1 JB(920402) sINDGeMMeNNoMMMaNNNo IL 
NA NE eNCYC, INCAS eLLLsNL»s IND2Z(9) >IT ELAST»+NLAST »fAREA, INOsIREV»ITREV2e 
LISTAL SLOG Ll lie Sls JGL C9, 04), JICL(9 704). IEECIZO4 s2) s TU Sis ERGs 11S 

REAL MA sMBe ML eo MUcL » LXC eo IXGoLLDES oh Gol 2» MFBA » MF AB eo MFCA s MFCR eo MAX » 

MEY e4HEAP»MABP, NCAP sMCLP»s MULP »MLUP »MDOLP»MDUP 5K eMC oMD 

REAL*& COLUMN,» ERACE sGIRDERs IDENTI »sIDENT2.ITOENT3 + IDENT4,»,IDENTS 


EGUATICN SCLVER - SYMMETRICAL EANCEO MATRIX 


LSGUNEG. NE. lye CONT O "95 

WRITE (6290) 
FCRMAT(1LHOs21LFECLILIURIUM ECLATICNS) 
BG 6O T= ,NA 

WEETE (C6562) 1 

WRETE €6,61 3 CACLsJ) eJ=1»NB) UCI) 
CONT TINUE 

FCRMAT((10(2x,F1C.0))) 
































c 2 a) 7 
r mes mn 
es Sie 
= =), 
' 


i 


/ ll ; 
~ » ui trea? ses 
tin Get, & ei ¢ ’ 
"Hie ® Op 
Ue fhew oF4 DOK 
Cy a AA, PICS OTR 
KL yp Atty WPPRs~Oy es 
VIAITTAID #75 
CV445+7 tere TPS a 
(A499 OS eZee {ate 
Sasi eh: 995 JO 


evieiwt) : , rP)S 1304 AM AGM D7 MOR ot TK ; 
ae - #Unid“>) Bae 
4o4 9? 9D-''4 04,000 ns 7 
44%,0e% 2at- 190 
(inves i> ci@et “ETA DS0 1 CNOR GS OTA ' 


SJ41T ASR 

(4.444 01209 se1(bS THA; 

€sS04 sn, OS DEE Peewee T Te, 
‘ : mM? oy 
” : GAR. 

; qvJ0d SUP Teinae 

‘pats ‘ > Pak. Cet Ob SRL 1) BP OK NA ANON 
vi teoewoadae O10 58 ede COOee2 85000 4 

4 , ot é 24, 6 ODe OP OS We dO, OIBANS SF 

foe) aM Tee) HANG OE 

1744 AD hah De Otte 0FOe OTERO e, 

a 

by 


oe bad Lk ‘eb, C144 =e 0) can ae eeeetes ' 
peared. i ERA» yi. AD e OPE hy FT OY, COO pay: 
‘oo Mir so, e) be, €40088 FORO, COO Open 
e@7 24, Sta SHAN AIUD 
; %e tO, 0155, 000.81 TVR g 
Id. CPOs 1 6U.01 t Sole OR, OUND S. (HO. 2S VSD S 
~ . os PV So. 0 Pde Pio € 
' F be ; bilby 1*®9, 749046 C84 O pdt + 8 Pie Oho we ae " 
‘ iv - 4 Pie UUs the hus §0O, Sh OOO 
o® O50 Ly COUT POURS £RO, DFE RO 
i ‘ *,;2K40.t8 po HOe OP 98. 00 SAAS 
(S. 90.) ROSe the bO0R TIO Os ee OIE t ' 
UDO. CS. PL O194. (Sp ay BU, COO oe peenee 
nOd te 04 29 - EAOy OTR ROC, ( oOVE ME : 
¢ Tan, . «08%, CODLTOM, (O0ST LIP e (DIGI ere 
i (o_o ¢ - ) tree htOyed Stet hOe Se) TOM eI eR VAer 2 
iT Led Wie aed eOr WEIN s OOO. OPTLY OR TES © 
Le eAiieM Og Ooi HL. te. ho05¢ OOS SL AeA Sa VAMOS : 
1% ra } ' 65 W,toe +4 P44] ow SS i, Raed o> TD, Fea € 
Lise fie hi he th, * ‘Dupls 1 O00) 5905160 eb ied bk Ghya anne. ee 
PEt. € 29%. 4 DA, D . ey Rigo us | OD De AR) BGA e Beehes 4, 7M, Ae At Hi 
SMP Die Re Ale”. lim. Oy de VA QED MAY, CGA SAB TSE ET 
i ‘ SGetaels ee V2 Pee Tete Ps Diets). 1440), WDOAL Se 338001 EO 90 1h BR 










r i ry es ; 
S/4TKe Yulee wad_LatanerE © haysae woLtauaa 
ne ute a ra? ae | 
; ar ae be 


a) : ‘ ; 


ae oe. et ae 


2 










A 
a 





1c0 
101 


O10 
ecg 


611 


612 
616 


614 


o17 


EES 
618 


620 


FCRMAT(1HO,I13) 

NAA=NA/2 

NAA=24*NAA 

IF (NAA CEQeNA) CC TG 100 
RRR=—-1.0 


TGoOr TON 101 


RRR=1.0 

CONTINUE 

NJ=0 

KxX=1 

IF(NBeECe1) GO TC E01 

Ni=NB6-1 

N2=N@-2 

OC 600 I=1sNA 

11=I-1 

t2=1I-2 

12=!-3 

IF(NBeEGe2) GO TA €09 

OC 610 N=1eN2 

VC LsNI=ACT N41) 

CONTINUE 

IF(1IeGCE~”NB) GO TC 620 

IFC LeEQe*1) GO TC 648 

IF (AC1,0)-EQ-0.0) GO TO 616 
R=AbLselLIZAC( 1.1) 

NY=NB41-I1 

CC 611 N=1.,NY 

ACT sNJ=ACI sNI—ACIsNtI11)*R 
CCNTINUE 

PCTI=ECI)—BC1) eR 

IFC IL eEGe2) GO TC 648 

OCT 612 *N=15 12 

VON41 oN) =VONtE 9NI-A(121-N)¥R 
CONTINUE 

IF (1LeEGe2) GO TC 648 

KK=1 

KxX=KX+1 
IF(VCI-KK»T1—-KK).EO.0.0) GO TO €17 
R=V(I-KK se ILI-KK)/SACKKt1 51) 
NZ=NB—-KX+KK 

CC 614 N=15NZ 

ACI sNJ=ACT eNI—-ACK KF Ls NtLI-KK)¥*R 
CONTINUE 

B(I)=EC1)—-B8CKK41)*R 

IF(ITeEG.3) GO TC 648 

Ix=12-KK 

LE CIxXe LE. 0) 1CG Te 648 

IE CVC I-KK»I1—-KK) 0£Q.0-0) GO TO 618 
DC 615 N=1.IX 

V(NtL eNJ=HVONF1 oN D-ACKK 410 I—N-KK) *R 
CCNTINUE 

KK=KK41 

Goon GIs 

ITREACI=“NI NE) -E9O.06.0) GE TG 630 
RK=ACT-NIsNB)ZACI-N191) 

POL 6 Cio rN DER 

ACI, 1)=ACT 21 I-ACI—-N1Ie¢NG) FR 

IF CUNG.EGe2) GE TE 600 

DG €2£ N=14aN2 

V(RtLSNJ=EVONEIL ON J-ACI-N12NG—-N) 4K 
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622 


CCATIACLE 

PRUNE wEeQes). GG Te E00 

OC 640 N=2,N1 
NaGwOMe+ tM NE—M) SEC. 0.0) Gl T6640 
R=V(NE+t1—M,N8—)/ACI-NEtM, 1) 
ECL)V=ECL)—e@(CI-Nb 4M) aR 

DO 64.5) J=1—M 

ACT + J=ACT,J)—-ACI-NGtM,NE4I—M) OR 
CCNTINUE 

NX=N1—-M 

ITFCNX.LE.0) GG 10 640 

DESESo) N=t aN xX 
VINtISNJ=V(NFt1 6h )—-A(I-NE+MZNB4E1—M—N) ¥€R 
CONTIAUE 

CCNTINLE 

NS=N1 

IF(NB-EGe2) GG TC. 600 

DOFGSS BiH 1 Ne 

VOINsJI=V(N—-14 5) 

CCNTINUE 

N=N-1 

LeUNSeQ sl) CO 1G 600 

GC TO 649 

CONTINUE 

OET=KFR 

OC 750 1I=1.NA 

ZZ=0-20 

OC 749 J=1.NB 

ZZ=ZZt+ACTsJIV¥*¥A( TJ) 

CCNTINUE 

PRCZ2eNEC060) (GOTO 751 

WRITE (6,303)I1 

ODET=—-CET 

GE" fo” 750 

Z2Z2Z=SCRTI(2Z) 

EEC CAGS CACTI +s 1°) ) 161.0. S0E=—20) GOTO, 752 
WRITE(E,8303) I 

FORMAT ULHOs AC %.s 14 o%51)=0" ) 
DET=0.0 

ELEM TO) 74S) 

DET=DET*A(I51)7Z222 

OCDO=AES(OET) 

IRCEDE Gi. 0. KOE—f1))) GO! TG VSO 

OE T=DET*O.,10E+50 

CORTIARUE 

FORMAT(1HOs*ALL TERMS CF ROW’, 14s" ARE = O°) 
WRITE{E+800)0ET 

FCRMAT (1HO,12tCETERMINANT=2E11 24) 
tC hecAS fh eeGe li) GO) TO “ses 

EF CINDS «EG. 1} Ge TG 1o9 

Te (CET .CEsO0.0) GG To secs 
INOZ=IAD03t1 

CCNTIALE 

I=NA 

LE Chet Ba CNASNG)) GE Te 621 
NJ=NI41 

LECN Sec Gel Jn GO. l.G oes 

GG Sth E22 

NJ=hKh86 

SUMA=0.0 . 
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A-52 


CQ 622 J=2,NJ 

SUMA=SUMAFACT eS) ¥X( 145-1) 

CCNTIANUE 

GG tO. 203 

SUMA=0.0 

IF CACT o1)9¥eNE-0-0) GC TC 626 

FORMATCIUHO.,*RECUCED Al *% el3e%2.1)=0*%) 

x(1T)=C.0 

GEO 20% 

X(1TI=(ACII—SUMA)SA(TI 21) 

FRCI.EC. EL} GO Te 627 

t=I-1 

GG TO 602 

CCONTIAUE 

RETURN 

END 
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VAC9 104) 6 VB(9 204) oMA(9 04) 0 MB(9904) »RABP(9 204) »sREAP(9204) 0 
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COMMCN/AREA2Z/ AC(SG 204) oe 1XC(9204) »ZXC(9 204) oRXC(9s04) »WO(94049) 0 
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FDES( 04) » VDES(9 104) »PDES (9) sF (04) 5P(9,04) sPAPP(9 104) sVINCR(9D204) 0 
RF (300),RLL(300).RP(300) 5A( 100 645) 5 V(45545) sDET sRENLL»RINF sRINPS 
SWAY (04) »ROT(9 2004) »DEL (9 204) 5C05(920492) 0C7(9304) C 819504) »RINVe 
RV(300) »eVIT(S 504) sVITL(I9 304) 1€S(95804) 5€10(9 04) 


COMMCN/AREAGS JC(G+04)2IG(9204) sJB(920422) sINDOsMMeNNoeMMMONNNoG IL 
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REAL MAsMOeML sNUslh » [IXCeoITXG»LLDESsL Gel @sMFBA »sMFAB»MFCA oMFCB s MAX 
1MEYs¥BAP »MABP + MCAFsMCEP »NULPs MLUFsMDOLPsMOUP sKeMCoMD 
REAL*8 COLUMN» GRACE eGIROER», LDENTL» I DENT2»/IDENT32IDENT4sIDOENTS 


COMPLTE ROTATICHKS» DEFLECTICNS € SWAYS 


NCYC=RKCYCHI1 
JI=2¥*M+1 
JJ=3*vMMt+1 
JK=JJ+1 
SWwAY(1)=020 
CC 100 M=1eMM 
DEL(M.,1)=0.9 
RCT(Ms1)=X(M) 
CONTINUE 

bC 104 N=2,NN 
SWAY(N)=X(N#JSI-JJ) 
CC 103 M=1.5MM 
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ROT(MeN)=X(NG@UI—-UK4F24N) 

DEL (M»sNI=XCN#VI-JI4+24%M) 

CCANTINUVE 

CENTINUE 

LLL=0 

OC 120 N=1,NKN 

DOC 115 M=1.MM 

PCAL=(CEL(MsN+41)-DEL (MN) )#AC (MIN) FEC(MIN) SHON) 

LEQRARGAeNE<)) Ge Te 220 

PCAL=1C0004*FCAL 

CCNTINUE 

ERR=AES(PCAL—-FAFE (N,N) ) 

PABS=ABS(PCAL ) 

IF(ERFeLE&(0-01*FABS)) GO TO 120 

LLL=1 

PAPP(M,N)=PCAL 

CONTINUE 

CCNTINUE 

LEC iNDG EO .s2.) > COMTO 326 

WRITE (6,300) 

0C 301 M=15MM 

OG 302 N=1.,NN 

WRITE (E4303 )MeNsRCT(MSN) »sCEL (M,N) 

CCNTINUE 

CCNTINCLE 

WRITE (6.304) 

CC 30S N=2,NN 

WRITE (6.308)NeSWwAY{N) 

CENTINGE 

FCRMATCLHOs*SOKRJCINT RCTATION VERTICAL OISPLACEMENT) 

EGRMAT OLEH si3sa lSs9XeE1l 64.9XsE11.4) 

BERMATCOIMI0.20FFELECR LEVEL SWAY) 

FCRMAT(1H »16,8X,£11.4) 

RETURN 

END 
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A-54 


REAL MAsHBeML »NUsL os IXC a ITXGeLLDES eL Gal Be MESA eMFAB + MFCAsMFCGsMAXe 


IMEY »sMEAP+MABPsMCAP»MCBP» MULP »MLUF sMOLP sMOUP 9K eMC oMD 
REAL*&8 COLUMN, ERACE »GIRCER»s IDENT1 se LOENT2s LOENT3» IOCENT4, IOENTS 


IND=0 


GIRDER MOMENTS 


OC 200 N=2,NN 
DC 199 M=1lshNMM 


IFC IXC(MeN)-EGeO060) GO TO 199 
MA(MeN)=CAL (MeN) #ROT(MaN)FCA2 (MeN) *¥ROT(MFtLONJ#CASZ(MON) *¥ (DEL (MeNI-D 


LELCM#+15sN))4#CAS(M, 


N) 


ME (MeN)=CBL(M,N)#ROT(MsN) FCB2(M5N) ¥ROT(MEL ON) +CBI(MON) F( DEL (M2NI—-D 


LEL(M+#1 oN) )tCRS(M, 


DI=(NACMINIFMEC MIN) IVALG(M NY) 


VAC(M»NJ=VWA(M2N)— 
VEB(M,N)J=VWB(Ms,N) +4 


IFC TELAST*e¢EQe1) GO TO 


N) 


01 
Ct 


1S9 


IF (JG(MsN)eEGe2) GG TA 260 
IFC JG(MeN)2EQe5) GO TO 260 
IFC JG(MeN) -EQe26) GO TC 2€0 
IF (IUG(M»sN)2EC28) GG TO 260 
IFC IG(Ms»~N) eLEC014) GC TC 260 
IFC YG(MsN)2EGe16) GO TQ 2€0 
IFC IG(M2N)2EQe21) GO TAO 260 


DZ=ABS(MA(MsN)) 


1F(O2e«LT»«ASBS(MABF{MsN))) GO 


IFC IG(MeN) eEQ010) 
IFC YG(M,N) -EQ.12) 
TF (IG(MeN)2EQe1°5) 
IFC SG(MsN)2eEC220) 
WRITE(65201)MeN 


FORMAT(1HO,s,27FEFINGE AT LEFT END OF GIRDER,2I13) 


IND=INOF1 


IF (MA(M»N)2GE202C) GO TC 


MABP(M,N)=—-MABF(M 
CS(M,K)=1-0 

IFC UG(MeN)eEGel) 
[FCIG(MsN) -ECe3) 
TFC IG(MoN) E004) 
IF (JG(MsN).EQe7) 
IFC JG(Me,N) -ECol1 ) 


Go 
GG 
CG 
GO 


oN) 


co 
GO 
GC 
GO 
GC 


(ae 
TO 
TC 
Le 


TC 
TO 
TO 
TC 
TC 


IFC IG(MeN) 2EQe17) GC TC 


GERIGS Ls 
JG(MsN)=2 

CGE LOmL a0 
JG(MsN)=5 

GE Te 120 
JG(M.N )=6 

GCS TOst 20 
JG(MsN)=83 
GOSTOFrh20 
JE(MsN)=14 
CAE(M,N)=020 
CEEG(MeN)=C7(MN) 
GES FO (120 
JG(MesN)=21 
GGs FC .120 


TF (O02 eLT».ABS(MACPF( MeN) )) CO TC 


118 
118 
i138 
118 


111 
Wey 
114 
117 
ris 
116 


S210) 


TG 


120 


120 
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112 
120 
2co0 


2o02 


WRITE(EeL12) MeN 


FORMAT (CIHOs*MOCNEAT VIOLATION LEFT END GIRDER + 214) 


CCNTINUE 

TFC IG( MeN) EGS) 
IF CIG( MeN) 2EQeS) 
TF (IG(MIN)-EQe7) 
IFC IG(MsN) 6EG 28) 


co 
GO 
GQ 
cO 


TQ 
TQ 
TQ 
TO 


PECUG UMN ee Ge So)” GE TG 
IF CIG(MeN) -EGe12) GC TC 
TF(JG(M+N)-EC2%20) GC TC 


D2=ABS(MBC(M.N)) 


261 
261 
261 
2é1 
201 
c61 
264 


IF (02 LTe¢ABS(MBAF(M)N))) GC 


LF CIG(MeN)-EGe11) 
IF (JG(MIN)LECL14) 
IF(JG(MeN) -EQe17) 
IFC IG( MeN) -ECe21 ) 
WRITE (E2202) 5N 


FCRMATCIHOs.28FERINGE AT RIGHT ENO CF GIRDER,» 213) 


IND=IND#1 

IF (ME (MN) -GE2O0.C 
MEAP (M »N)=—MBAPUM 
CS(M»eN)=220 

[TF CUG(MsN) «.EQe1) 
IFC IG(IMsN) -EQe2) 
IF (CJG(RM®N)2EO24) 
IFC UG(M»N) -EGQeE) 
IFC IG(MeN)-EQe10) 
IF CIG(IMsN) -EGeIS) 
GC TO 128 
JE(M,N)=3 

CG sO eiso 
JG(M,N)=5 

GE TOP ts0 
JG(MeN)=7 

CE TOm itso 
JG(M,N)=8 

GG SiO 5120 
JG(M,NI=HA13 
CAG(MsN)I=C7(M,N) 
CE6(M.N)=0.-0 

GE hGs13 30 
JG(MsN)=20 

GG TO 130 


IF (O02.LT*ABS(MBAP (MIN) )) 


WRITE(E,105) MeN 


FORMAT(C1HO,*MGMENT VICLATICN RIGHT ENO GIRDER®*,214) 


CCNTINUE 

IFC UG(MsN) EC 4) 
IFC IG(MsN)2EQe €) 
IF (IG(MeN)-ECe 7) 
EE CUGCM s Nive Ge. ue ) 
IFC IUG(MoN)}.EQ21°) 
IFC UG(M ON) -ECeol17) 
IF (SGOMeN)2EC 220) 
LEM IG(MsN) «EGQ.21) 
ITF Cw( MeN) eEC 2020) 


IF(VAC(MsN)~2LT2O-C) GC TC 
1) GESEC 
D2Z=ABS(MA(CMAN) FVACM oN) FVA (MON) 6 0O/W (MON) D 


IF (VE(MIN) LT 2020 


MC{(MsN)=D2 


co 
GC 
Ga 
GO 


Ha Mele, Wl. Bia} 


»N) 


GO 
co 
GC 
GO 
GG 
GC 


TO 
Tc 
TC 
tC 


TO 
we 
ta 
TO 
TO 
TC 


GC TC 


GO 
GO 
GC 
GC 
GC 
GC 
cc 
GC 


TC 
TC 
TG 
TC 
TG 
TO 
iR9) 
TC 


128 
128 
12a 
128 


121 
are 
124 
V26 
aS 
125 


140 
140 
140 
140 
140 
140 
140 
140 
140 


140 
140 


TO 


cG TO 


130 


130 
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2c3 


204 


2cs 


143 


139 
We ie 


138 
140 
is9 
200 


IF (C2eLT»*ABS(MCAF(MSN))) CO TO 
IF (JG(MsN)~2EQ212) GO 
IF (YG(MsN).ZECLIE) GO 
IFC JG(M,N).2EG.12) GC 
IF (JG(MsN).EQe10) GO 
IF (CIG(MSN).EQe11) GG 
XGOMeNI=LZCOKVACMINISWOMeN) 
YG(MeN)J=LGOMsN)—XG(MIN) 
WRITE (60203)XG( MeN) oMeN 


FORMAT C1LHOs6HHINGE 


IND=INC#lL 


TO 
TC 
EG 
Ta 
TC 


oF 8e2e31H 


137 
137 
13% 
127 
is 


IF (CEL C(MeN)LT.~O0O0) GC TC 204 


MCAP(M »eN)= 


GO tO 20S 


—-MCAP(M.N) 
C9O(M.N)=3-0 


MCBP(MeNI=—-MCBP(MeN) 


CI(MoN)=420 

IFC SG(MeN) 2EQs1) 
IF (JG(MsN) -EQe2) 
IF CIG(M2N)EQ23) 
IF{ JG(M.N)2EQ.S) 
IF(JG(Ms»sN)-EQe12) GO TO 


GO 
GO 
GO 
GO 


TQ 
TC 
TO 
TC 


IFCJIG(M»eN)2EQ214) GO TO 


GES TO i377 
JE(M,R)=4 
Gc TO 140 
JG(MsN)=6 
Go TO 1490 
JG(MeN)=7 
GO TO 140 
JC(M,N)=8 
GE Th u140 
JG(M»N)J=20 


WRITE (E6139) MeN 


Gc TO 140 
JG(MeN )=21 


WEITE(E,139) Myr 


GO TO 140 


FORMATCIHOs*HINCE ROTATICNS GIROER*.2145° 
TF CC2 «LT eASS(MCAF(M.N))) 
WRITE(64133) Neh 

FORMAT(UHO,* MOMENT VIOQLATION 


CONTINUE 
CONTINUE 
CONTINUE 


CCLUMK MOMENTS 


OC 480 M=1.™M 


IFC UXC(My1) -ECe2C.0) 


IKC2(")=0 


LEN CON DCA ES Fiche aA | 
TECIC CMS) cEG.S) 
IE(JVECMs Ly ebG ek) 
PECVeCMy 1 vce Gs 8) 


GC 
GG 
GG 
GC 


GC 


TG 
TG 
To 
LG 


ML(N,1)=—-K(M)*RCT(M,1) 
GG TO 49C 


BECVELAST SEG st J 
DI=ABS(NML(Me1)) 


31 
Sls 
tas 
Ess 
142 
143 


TC 480 


48S 
485 
438s 
48S 


TE CE M.LCED ABS (CMLUECM.13)) CC TG 


TADS (CA V=l 


140 


co TO 140 


INTERTOR GIRDER* 2.214) 


430 


NO LONGER VALID* ) 


INCHES FROM LEFT ENO OF GIRDER. 213) 


’ 
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41 


465 
490 


450 


8co 


B10 


820 
401 


4C2 


IF (NL (M21)2GCE20-C) 
MLOMe1)=—-MLUP(NM.1) 


GC Tc 490 


NL (Ms, 1 )=MLUF(M,1) 


GC 


A-57 


Tra Ass 


MU(Me1)=CULCMs1)FKOT(M,1)#CU2 (M91) ¥ROTI(M,2)—-CU3(Mo1) *SWAY(2) #CUE(M 


1,1) 


VUCMes1I=ACHUCM sLIEML IMs LIFE (MZ, 1)V*FSNAY(2))/7H(01) 


VL (M,1)=-VU(M,1) 
CONTINUE 

CC 400 N=1eNNN 
0C 39S M=1,Ni4 


IFC IXC(MeN) -EG2L0-0) GO TC 399 
LEC Gel) GG TG &¢oO 
MLOMsN)=CLICMZNYXRGOT(M,NIFCL2A(MSNI*FRCT(MNtL DP tCL3U(MsN) *¥(SWAY(N)—SW 


LAY(N4#1))#CLS(M,N) 


MU(MseN)=CUL( MeN) FRCT(MsN) tCU] (MeN) ROT (ASNt1)4CU2(MIN) *€(SWAYO(N)—SW 


TAY(N#1))+#CUS(M,N) 


VUCMsNJ=(MUCM NJ tML (MeN DFP (MON) FC SWAY(N#1)—-SWAY(N))) ECON) 


VL(M,N)=—-VUC(M DN) 


LE GLEEAST 260 ol} #GG7 10 399 


GQ TQ 810 


LEGLECASTVNEG.!) GCC TQ 399 


IF( INC2(M).-EQe1) 
GC 7TO"350 

TF ( JCIM,N) EC eZ) 
IFC JC(M,N) EQS) 
IF (JC(M»N)D CECE) 
IF( IC(M»N) eEQ28) 
O1L=AGBSC(ML(M,N)) 


GC 


GCG 
GG 
GC 
GG 


7a 


Use 
TO 
TO 
TQ 


e@20 


366 
3€0 
360 
3E0 


IF(D1eLTeAGS(MLUF(M2N)D)) CCG TO 320 


WRITE (65401)M5N 


FCRMAT(LHOes28tHFINGE AT LOWER ENDO CF COLUMN, 2I2) 


TNO=INOF1 


IF (ML (M,N) -GE20-C) CC TO SOI 
MLUP(M sN)=—-MLUF(N,ZN) 


C1lO(MsN)J=1~20 

IFC IJCOMsN) -EQe1) 
IFC JC(MsN)2EG23) 
IFC IUC(M AN) -EQ4) 
IF CIC(MsN) .-EQ.7) 
GGe 107320 

JC(MsN )=2 

GO, FO 320 
JC(MeN)=5 

GG TO 320 
JC(Ms,N)=6 

GC, TO) 3.20 
JC(MeNI=SB 
CCNTINUVE 

LR CUIGUMAN ee Oc 3) 
IFC UC(MeN)EC6S) 
TE(VC UMN EG s7) 
IFC IC(M,N)-EQ28@) 
O1=ABS(MU(M,N) ) 


GO 
GC 
GO 
GG 


GC 
co 
GC 
GO 


TO 
Te 
TO 
TO 


Ue 
TO 
TC 
TG 


Sh | 
313 
314 
317 


361 
Seog 
361 
3E1 


IF COVSLT eAGS(MULFE(MSNY)) CO TO 330 


WKITE(64402)M5N 


FCRMATCIHO,23FKINGCE AT UFFER ENC CF COLUMN, 213) 


INC=ITA0D+1 


TF CMUCMIN) eGEe0eC) 
MLL P(M »N)=—MULF (MON) 


GOMLE SOu 
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sc2 


208 
789 


4C3 


404 


570 


C10(MsN)=2.0 

IF CJC(M5N)2EQs1) GO TO 
IFCIC(MsN) eEGe2) GO TC 
TF (ISC(MsN)2EQ.4) GC TC 
IFC JC(M2N)2EQ.6) GO TO 
GG Te7s30 

JC(MshN )=3 

GE, 767330 

JC(Ms,N)=5 

GG 1Gs330 

JC(M,N)=7 

GG_ TO) 330 

JC(MsN)=3 

CCNTINRUE 
FRe(JetvaNyweG.s 4) GO TC 
IF (JC(MsN)-GE26) GOD TC 


IF (P(M,ZN).LE.0-0) GO TG 350 
DI=SCRTCP(MsNISCEC(MsNY*ITXC(IMON) DD 


D2=SIN(OD1L*H(N)) 
DI=COLS(O1FH(N)) 


IF (ML(MeN)2EQ202C) GO FTC 758 
D6E=(ML (MN) #03 *MUCM IN) DSCML( MON) #02) 


XC(MeZN)=ATAN(—ODE)Z0O1 

Ge TO 7s9 
XCOMeN)=125708/0C1 

IF CXCEMeN) eLTeCeolLO*FH(N) 


IF (C4.CE~020)GO TC 331 
WRITE (6403)MeN 


FORMAT(LHOsS3KNEGATIVE SCUARE RCCT 


IN»2T3) 

GG, TOs S350 

S=SCRT(D4)702 
MO(Ms8 )=DS 

ITF (OSeLT«ABS( MOLE (MN) ) 
YC(MsN)=HON)—-XCOMIN) 
WRITE (CE ,404)XC(MsN) oMSN 


J2l 
ae 
224 
326 


350 
380 


» GE TGy350 
IF (XC(MsN) oGTeOeSO#F(N)) GO TO 3ES0 
D4=MLIMsN) ML (MeN) 4260403 4ML (MON) FMUC MON) EMUCMON) ¥MU(CMON) 


2 COMTOess0 


A-58 


INTERTOR MOMENT COLUM 


FCOCRMAT(CIHOs6HEINGE »F8e2e32K INCHES FROM LOWER END OF COLUMN, 213) 


INC=IAO+41 

IF (ML (MeN) -GEe02C) CO T 
MOLP(MsN)=—MOUP(MSN) 
C1lO(MsN)=3-20 

IF (MU(M»N)2GE20-0) CO T 
MOLP( M,N) =—-YOLP(M NN) 
C10(Ms»N)=4-20 


ITFCML OM e«N)*MU(MSN) LT *O4C) CU TO 


D7=ABS(MLIMON)) 
DE=AGS(VUCMLN)) 
DEGET 6 GE~wO8') GeG pC, S72 
MCUP(MeN)=—-MDUP(M,N) 
CLlLO(M.N)=3-20 

GE TOy (= 20 
MCLP(MeN)=—-MOLP(M>N) 
C1O(M»N)=420 
LECIC(MeNI 2cEGe lt) GO Te 
IE CICOM SN) seOece )) GO NG 
PE CIC UM INI ee Gest) GG iD 
LE CSOCUM Ss INie Ow a) GET 
Cl G50! 


Co S70 


Ces 


341 
342 
343 
345 
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JC(M,N)=4 
GG9705350 
JC(MsN)=6 
GESTOr=S0 
JC( Meh )=7 
GGG {50 
JC(Meh)=8 
CCNTINUE 
CCNTINUE 
CCNTINULE 
LECINEG ..COsc2) CO TG 435 
WRITE (62410) 
0G 420 N=2sNN 
CC 419 M=1.,MMM 
WRITE (6 o4LLIMeNsMAC MeN) MCU MON) oME( MON) pVACMON) sp VEC MON) se JIG(MotN) eo MA 
IGPOCMsN) sRABPO(MeR ) sRCAP( MeN) pe RBAP( MON) 
CCNTIAUE 
CENTINCE 
WRITEC( 66412) 
OG 430 N=1.NNN 
DC 4259 M=1,NM 
WRITE (6 e411IMsNoML( MeN) oMD(MoN) sMUC MON) eVL(MoN) »sVUC MN) »p IC(MGN) o NE 
LUPOCMSN) »sRLUP (MeN) sROLP( MIN)» RULP( MSN) 
CCNTIAUE 
CCNTIAVUE 
GENFANCE 
FUORMATCIHO.*GIRCER MA MC vB VA 
1 VB FINCE MP AP cP 
2BP*) 
FORMATCUIA +213 ¢262]2X 2F 1164) »2(2XsFSe4) cL Ge2X0Fll 04, 3(3X2E11-4) ) 
FCRMAT(CIHOs *CCLUMN ML "AD MU Vie 
1 VU FINCE MEC EP OP 
2UP") 
RETURN 
END 
SULBROLTINE CHECK2 
COMMOCNSZAREALS AGC(9,04)s I1XG(Gs04)5Z2XG(Gr04) sFYG(G,04) sEG( 9204) 6 
1 BDLDEES(9.04) sLLDES(G.04) -L C19 204) sW(9 204) sVWALY 504) »VWB(9D 204) 
2 MFAB(G 204) »MFBA(G304) ¢NFCA(GS 204) eMFCB(9204) MAX(G.04) »p¥MUYVYI(9GD6C4)o 
3 VWAL (9.204) »sVWEBL(9204)+CA1(9 204) 5,CA2(9,04) .CA3(G9,04) »sCA5(Ge204) 
4 CA6(¢S.04) .CB1(5 204) »CB82(9 04) sCEI(9 404) -.CES(9 204) »CR6(9G,04)>5 
S NBAP (9,04) sMABF(9 204) eMCAP(9204) sMYCBP( 9204) -XG(9s04)sYG( S04) 6 
E VAS 604) 6 VB(IG 504) eMA(9D 104) eME(G 204) 2 FABP(G204) »eRBAP(G204)0 
7 RCAP (9.04) +DELC(Gs04) sRBAPL(G+04) +RCAFL(9 504) »-RABPL(G,04) 
CCMMCANSAREA2S AC(9 504) 4 1XC(9 24049) 5 ZXC( 94904) eRXC( G04) suCl(9s04) 6 
1 FYC(9 204) .EC(9 504) 2€0(9 304) .SS(9 504) 2 COX(9804) eSSK(9,04) 6 
2 CCY¥(S 204) eSSV6G 204) eCL1(G 204) »CLE(9204) CL 3(9204) -CLE(G9004) 6 
3 CU1(G 204) 2CU2(9 204) 0 CU3B(9 204) eCUE(9204) eMD0(G.04) eMC(GeO04) 6 
4 MULP{(G.04) »MLLF(Gs04) »sMOLP(9U504) eMDULF(9 104) sXC(9 204) +5YC(G204 De 
5S XMP(9,04).,VL(9204) sVU(9204) oe ML(Gs04) oMU(92904) sRLLP(G 204) © 
6 RULE(G,04) »~ROLFE (9.04) ~—DELO(9204).L(9),H(04) -K(9)2-SUMV(G).8(100) 
CUMMCN/SAREA3BZS AB(Ss C482) sRXE(G004 92) sFYB(9 20402) sEL(G 20482) 
Ll LB(9 50462) .CO1(5 50402) eCO2(520452) »-C03(9r10422) »C04(5404s2) 0 
~J CC20S 404) sPCKR(9 404 92) sFB(9 20402) sF BF (9s 0402) eFEKX(9 20442) 2X( 100) 6 
3 FOES(04)s.VDES(S 004) »sFOES(9) 2F (04) oP (Ge.04) sPAPP(9,04) sVINCR(9 204) 0 
4 FF (300) RELL (5300) oe RE(3I00) 2A(1005485).V6 452459) sDETsRINLL»RIAF sSRINP 
5S SwAY(04) eROT(G eC4) sDEL(9 204) 6C€05 (9,04 02) 2C7(9 404%) eCHh(D,04) eRINVe 
€ RVC3CO) pVITCS 004) sVITL(G 004) 0C€5(5504) -C10(3,04)} 


CCMMONSARE ASS JC(9 004) 5 IG(9 904) 5 SE(9 50402) s INDE SMMsNNoMMMoNNNoG IL oo 
1 NAsNBeoNCYCSINO2Z sLLLoNL eI ND2(9) eTLELASTsNLAST sIAREA,INCe TREVs IREV2,s 
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612 


Eel 


613 


660 


A-60 


2 ISTABE sTLOs Lite lI2]sIGL (S504) sJCL (9.049) JBL (9.0402) pL13,1140115 
REAL MA sMEeML oMUsl pL XCeoIXGoLLDES eL Gel Bey MFBA eNFAR oS MFCAsMFCBeMAXe 
IMEY es MEAP eMACP »MCAP sMCEPsMULPsMLUP»MDLPsMDUP 0K o MC eND 

REAL*@ COLUMN .ERACE »eGIROERs ICENT1IsIDENT2, IDENT 3+ ICENT 4s IDENTS 


FINCE ROTATICNS 


GIKDEFS 


OC €51 N=2eNN 

CC 649 M=1.MMM 

IFC JG(M,N).EQe1) GC TO 6h 

IF(JG(MeN)2EC.2) GG TO 612 

TF CIG(M.N)2EQe3) GO TO 613 

IF (CIG(MsN)-EC.4) GO TC E14 

IFLIGC(MeN) -EQeS) GO TO 615 

IFC IUG(M2N)eEQe6) GC TQ 616 

IFC IG(MeN)-0CQ4.7) GO TC 617 

IFC UG(MeN)-EQe2) GO TO 618 

LECIG (MeN) «EGe13)" GO TO E13 

LE CIGCMaNDcEGQ.14) GC TC 612 

IECIG(MseNJ eEQe1E) GO TG 614 

IF(JG(M.N)-EC21E) GO TO 612 

IF CIG(MSN) .EGe17) GG TC 614 

TFC YG(M.N)2EQ21@2) GCG TC 613 

IF ( JG(M,N}-EQ.20) GO TO 617 

LELIGUMsN) «lOeel) CGE TE ‘616 

GC TO 649 

RABP(¥,N)=0.0 

REAP(MsN)=020 

RCAP(M»,N)=0.0 

GG TO 649 

RABP (NM sN)I=(0-25*#LG(MsNIS(CEG( MeN) ¥*LEXG( MIN) ) ) *®¥CMABP(M2N)—-MFAB(MSN) D— 
LC LeOt0 6 75*¥WCI(MsNISLGIMON) )¥ROT(MINI—€ 005400 7E*FWC(MtELIN)SLG( MN) ) €R 
2CT(MFtLsNJ F1L)¢eS#(CEL( M41, )—-DEL (M,N) )SLE(MN) 

FCAP(M,N)=0.20 

IF (IG(MN)-ECe14) GC TC 661 

REAP(M.»N)=0-0 

GC TO 649 

RABP (MN s4N)=RAEF (MeN )—-0 e-S*#¥RBAP(MSN) 

GE 10 E649 

REAP (MN) =(O62S*#LEC(MsNIS(EG(M9N) ®ITXG(MIN)) ) ¥(MBAP(MSN)—MFRA(MIN) D— 
1(06¢S#0e75S*WO(M sNISLGI( MIN) ) ¥RET (MIN) —( 10040 oe 7TEXWCIM*tL SN) /LG( MON) ) ¥R 
2CT(MFIsNIF1.S54*#(DEL(MFt1 oN )-DEL(MyN))/SLGIMN) 

RCAP (N,N) =0.0 

IF CUG(M,N) -EQe12) GG TC 660 

RABP(M,N)=0.0 

GE TQ 649 

RBAP(Ms,N)=RBPAP(MN)-O6S*#RABP(M,A) 

GC TO €49 

D1=XG(MeN)*XG(MoN) 

D2=YG(MseNI*XYG(M IN) 

DI=C1L*txGC(MsNn) 

D4=C2*YC(M,N) 

O0S=014*C27{03+04) 
DELC(M+NI=DS#(IYE(M OND ¥(C (MFAR (MSN )—OeSEMECAC ASN) tH165*MCAP( MeN) tMAX( 
IMsNIISCZCOFEGIMANIFIXG (MeN) DFC lL eOFDeSHENC(MeN)SXG(MIN) ) FRUT(MeNISXG 
2CMeNI#FDELOMLNISOLIFXGOMINIE( (OCS#MFCE (MeN) —MFRBACMeN)—12¢5*MCOP(MIN)D 
S*+NBYOCM ON) IZ 03 eOFEGC( MONI FIXG (MON) )—-C Le OFDeSFEKC(MFELINISYG( MON) )€ROTO 
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663 


€€4 


616 


622 


623 


G7 


624 


A-61 


4AM+LeNISYG(MN) F0EL(M41,N)702)) 

VE GIG UM aN } ce NERS) NGO! TONE eSs 
CELC(M »N)=DELC{M oN) HCBE (MON) €O2/7 (360 4LG (MIN) HEXCKMSN)) 

TECIGUMsN}) eNE®17) GO TQ 663 
CELC(MsN)=DELC (MIN) CRE (MIN) ¥OLS (03260 #EG( MIN) #IXG(MSN)) 

RCAP ANE NY=(MCAP (Ma NI-MECACMaN) )*#XG(MsN)#0025/ (EGIM.NIRIXGIMSN) )—(O 
PeStQe7S*WCOM oN D/XG( MON) ) ROT (MON) +1054 (DELC(MSN)—DEL (M5N) )/XG (MN) 
2— (MCBPCMeNI-—MFCE (MeN) ) #0 e25#YG(MoNIS(EG( MeN) #IXGIMON) 0 #( 00540. 754W 
SCOM#L OND /ZYG(M ON) DFRCT(M+L INI—-1 eS *#(DEL( M+) »N)—DELC(MON) )/YG(MGN) 

LE CIG(IMN SND «<EQe 1S) GO 10 664 
TF CIG(MaN) eEGe17) GO TC GES 
RABP(Ms«N)=0.0 
KEAP(M¥,N)=0.20 
GC TO 649 
RCAP CM sNJ=RCAP(MoN)—-O4.S*¥RABE( MeN) 

KEAP(M.N)Y=0.0 
GC TQ €49 
RCAP (M»N)J=RCAP(MIN)—O.S*#REAP(MIN) 

RABP(M»N)=90-0 
GC TO €49 
RABP CM eNI=CLE(MIN)I/ (6 6CHEG( MSN) *IXG(MON))) ¥(2.0€MABP(MSN)—MBAP(MAN 
1)-2 eOFMFAB(MsN)tNFBACMIN) )—(1 004065 *WOOMeNI/LG( MeN) ) XROT(MSNI—( 005 
2EWCOMtDONISLG( MIND) FROT (M41 oN) + (DEL (MFI SN)—DEL (MeN) )/SLG(MgN) 

REAP (MsNI=(LG(MIN)7Z(6604EG (MIN) #IEXG(MSN)))*(200*MBAP(MsN)—MABP(M,N 
1)-2.0#MFBACMsN) +NFAE (MSN) )—(0eS#tWC(MeRI/SLG (MON) ) #ROT(MONI—( 1004005 
2eWCCM4FLSNISLG( MON) )#ROT(MtEL SN) #(CELCM414N)—DEL (MeN) )/LG(MSN) 

RCAP{(M »N)=0.0 
GC JT0 €49 
DEL COM »NI=CYGOMSN)*YG(MINIS( 340 #EG( MeN) KIEXGOMON) DEC CYG(MeN)SXGUMy 
IN) ) *(MABP (MSN) +MCAP (MsN) +MAX (MeN) )#MBY (MeN )—165*MCBP (M,N) —MEBA(M,N 
2) +0 eS4MFCB(M oN) I—C1eOtOeS#WCK MHL oNISYG( MIN) )#YG(MoN) ROT (MEL N) #0E 
BL{(M+t1,N) 

TECIG(MeN).NE-21) GO TO 622 
DELCOMsN) =DELC(M »NI—CXG( MIN) #*¥34YG(M oN) &*3) FCAG(MIN)S(300*EG (MAN) 
1*ITXG(M.N)¥XG(MLN)) 

RAGF (MND =(XEC(MsNIZ (6 OFEC (MONI *LXGUIMON))) €(2060*MABP(M4N)—MCAP(MN 
1)-2-.0*MFABCMsN) +NFCAC MIN) -C 1 eOt 00S EWC(M ON) /SXG( MeN) ) FROTLM ON) + (DEL 
2C(MeN)I—-CEL(Ms,N) )/SXGC(M,N) 

RCAP(MeN)=(XG(MsNIS (E00 FEG (MIN) *IXG(MON))) %( 220 *MCAP(MsN)—-MABP (MAN 
1)-260*#*MFCA(MsN) #MFAB( MIN) )-—CYG(M IN) /(04e0*EG( MIN) ¥IXG(MIN) )) (NCEP 
eMsNI—MFCBO(MSN) —(0 eS*WO(MeNISXG( MON) ) #ROT( MN) + (005400 7S*WC(MHL SN) 
S7YG(MyN))V*ROTCMtI1SN) + (CELC(MeN)—DEL (MIN) )/XG(MoNI—1 0S * (CEL (MELON) — 
4DELC(M aN) ISYE{MsN) 

FECIGCUMsN VeEGecl') Gl TG 623 

REAP (MsN)=0.20 

GG TO 649 

RCAF (MsN)=RCAP (MaN)—-O0 eS*FBAP(M,SN) 

GO TO €49 

DELCO(MsNI=CXGIMsN)#FXGOM SN IS(3COFEGIMIN) XEXGC(MON) )V*( CXGI(MeNISYG(Me 
IN) ®OCNBY(MsNI—MCEP(M>N)I—MEAP (MSN) #1 oStMCAP (MIN) HMAX (MON) #MFADB (MON 
2-DeS*MFCA(MIN)) HC 1Le0tO eS #WC(MsN)SXG( MON) ) #XG( MON) #RET( MeN) FDEL (My 
3N) 

IFC IG(M.»N)-NE220) GC TC €24 

DEL C(MaNJ=DELCIMyN)FCAB(M IN) FCXG(MIN) K*E3HYG(M IN) F*#3)/(300%EG( MeN) 
1 #IXG(MsN)*FXG(MsN)) 

REAP( MeN) =HOCXG(MeNIS(ECCHEC(MIN)#IXG(MEN) ))¥*¥(200*MPAP (M,N) —-MCOP(MSN 
1-2 eO*MFBA(M SN) F¥FCB(MIN) —CLeOFO eS FEWC(MFHLeNISYG( MeN) ) ®ROT( MHL ON) + 
2(CELCHM41LeNI—CELC(MsNIISYE(MeN) 

RCAP (CM eNI=CXG(MeNI S04 eOPFE GI MIN) #®IXG( MeN) 2) *(MCAP(MON)—MECA(MON) J—( 
LYG(MeNIS(GCOKEGOMONI*ITXGCOMONI))%( 200 *MCBP(MeN)—MBAP(MSN)—2e O0¥MFCBE 
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A-62 


2MeNI Ft MFBACM IN) )—(OeSt0o7S#WC(MaNISXGOMSN)) FRCTOM ON) H+ (O05 AB8C( MELON) 
B/SYG (MIN) PFROTCM ELON) 105% (DELC(M»+N)—OEL (MeN) )AZXG(MSN)—-(DEL (MEF ON)— 
4DELC MeN ISYE (MeN) 

IFC JG(M.N)2EQ.2C) GC TC 625 

KAEP(MsN)=020 

GC TC €49 

RCAP (NM sNIY=RCAP (M»NI—-O 0S #FRABE (MAN) 

GC Ta 649 

KABP OM seNI=9ISGG GG 

REAP(M»N)=99S9 49S 

RCAP(M4N)=99S99 29S 

CCANTINLE 

CCNTINUE 


CCLUMAS 


0G 750 N=1s,NAN 

OC 749 M=1,MM 

EF GJGC(NE ND SDEQs 1) (GO TO" 71? 

LE CIGEUMeN) EG. 2) “GO te! File 

1B GCICUMANI SERS SY IGO TOY 713 

LF CIC(MeN) -EGe4) GC TO 714 

LEGJECMsN) «EQ af bh iGO) tO, 7S 

IFC JC(IM.N)-EGQeE) GO TO 716 

IF CIC(M2N) «EGe7) GG TC 717 

TE CIC (MsN)<«EQe28) GO TO 718 

RLLEP(M,N)=0.20 

RLLEIN.N)=020 

ROLE (MsN)=020 

Gc TC 749 

RLUP (MeN) =CHEIN)S(CCUMON) FECI MON) FIXCOMSN) )) EMLUP(M9N)—CSS(MINISCCE 
IMeN)) #RUT(MoN#19-ROT (MONI F0(CC(MeNIFSS(UON) VZ(CCEMSN) HON) ) ) XC SWAY 
20N4+1)-SWAYCIN))D 

RLLP(MsN)=0-0 

FCOLP{MsN)=0.0 

GEyTOs2 49 

RLUP(M.N)=0.0 
FULP(MsN)=CH(RIZ(CCOUMsN) FEC (MON) # EXC (MON) ) ) XMULP(MsN)I—(SSO(MON)/CCE 
IMsN)) #ROTOMsNI—RCT(MeNt1D (0 (COOM9N) tSS(MON) FZ (CCIM9N) ¥H(N)) ) ¥C SWAY 
2(N+1)-SWwAY(N)) 

RCLP(¥,N)=0-40 

GC TO 749 

D1I=CC¥(MsN)FCCX(MSN) 

D2=SSX(MsN)¥*¥SSX(MON) 

S=CCY(M,N) ¥CCY(MsN) 

D4=SSY(MeN) *SSY (MSN) 

S=(D01—-D2)/7CCX (M,N) 

DE=(02-04)/CCY(M»N) 

O7=ECIM»N) €IXC(M,N) 

C@=C7s/XC (MeN) 

CS=D7/4YC(M»N) 

C10=C8/XC(M.N) 

OLL=DS/7YC(MsN) 

O12=PAPP(%4»N)-CE*DI1 

O1L3=PAPP(M.N)I-DEFCIC 

DELD (MN =OCXCOM ND *CNDUF (MON) ECSSY (Me N)ZCCY (MON) ) ¥MOLF (MeN) DE 409% 
TROT OM NFL) F012 ¥SWAY (REL) DH-YCUMe RDF (MDLP OM ON) #(SSXOM9N)SCCX (MON) DEM 
2OLP (MIN) 405*0E ROT (Mo N)—-OLS#SWAYON) DIZCDL2*XC( MeN) FD 13*YCOMONDD 
ROLP(NsNJ=(XC(MsNISICCX(M »N)*O7)) ®MOLE CM eNI—CYC (Me NISC CCY (Mo N) #07) 
1) °¥OUF (MeNI—CSSEX(MeNISCOX(MON) )DFRCTOMeN) CUSSYOMeNISCCY (MeN) DFROT(M 
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A-63 


2 eAt1)+(COXC(MSNYF+ESX(M INR) I7C CCX (MSN) EXC(M ON) ) FCOELE(MYNI—SWAY CN ) —C 
BCCY(MsN) FSSY(MIN) ISI CCY (MeN) FYCOMON) J ¥(SHAVY(N41 JD-DELOC(MSN) ) 

RLLF(MsN)=020 

KFLLF (M»N)=020 

GC TG 749 

RLULP (MeN) =H(N) #(SS(M2N) #MLUP (MeN I—-CC(UMSN) ¥MULP(MINIISEOCSS(MeN) FSSC 
LMesN)—CC (MeN) CC (MeN) ) KECK MeN) FIXC (MeN) )—-ROTI(MoN+1) t+ (SWAYCN4+1 )—SWAY 
20N)) 74 (N) 

FLUP (CM »N)=HIN) (0 CCOMSN) FMLUP (MeN )—SS (MeN) FMULP (MIN) ISI (CCOMSN) CCE 
IMsR)—SSOCMON) FSS (MON) ) FEC(M ON) #®IXCKMON) )-ROT (MON) t(SWAYOCNt1)—-—SWAY(N 
2))7h{h) 

RKCLE(M.N)=0-0 

GC TO 749 

D1l= (CCY (MeN) €CCY (MeN) —-SSY (MeN) ¥SSY (MeN) ) FEC (MON) #LXCOIMsN) SOC YC (MOND 
1*CCY(MsN)) 

DELC(MeN)=( (1 e0t(SSY(MsN)SCCY (MeN) ) ) XMCUPR (Mo NI—(CYCOMeNISXC (MON) ) #6 
LMDLPE (CM oN) (MLUP(M SN) 2) +01 ROT (MeNt1) +P APP (MON) #0 YC(M9NISXCOMON) ) ®SWA 
PY(N) +(PAPP(MeN)-CLZYC (MeN) ) SWAY (N41) 7 (CPAPP (MON) ¥CL COFYC(MeNIZXCO 
3SMeN)—-OLSYC(MeN)) 

ROLP(M eN=CXCEMeNIS CO SSX(M ON) SEX (MN I—CCX OM ND ¥CCX (MON) ) FECCMOND* 
LIXC(MeN))) &©€SSXOM oN) KEMULECMSN)—CCX (MeN) XMULP (MON) —CYCEMSN)Z(CCY (UM 
DeN)FECIMeNIFIXCOMSN)) ) #MDUP(M INI F(SSY(MeN)SCCY(MoN) ) FROT(MeNtL I #00 
Z3ELD(MsNJ—-SWAYUN) )ZXCOM oRI—C1 eOFSSY (MS NISCCY (MON) ) ® (CSWAYON41 D—-DELD( 
4NN))/YC(M2N) 

FLUP(M»N)=XC (UM oN) *€C CCX CMON) #MLUP (Me NI—SSX(M ON) EMOLPOC MONI ISOM CCXOUMS 
IN) ®CCX (MeN) —-SSX OM oN) ¥SSX (MON) )*EC (M9 N) © EXC OMEN) D-ROT (MON) t(DELO(MS 
2N)—-SWAYOIN) )ZXC(M IN) 

KFLLE(M»sN)=040 

GG son 749 

D1=( CCX (MeN) €CCX OMe N)—SSX (MN) SSX (MON) ) HEC (MeN) EXC (MONIZOXC CMON) 
1*¥CCX¥(MsN)) 

DELDUMeN)=COXCKMSNIZYCOMaN) 2 #(MLLFE( MeN) +MDUP (Mp XN) #PAPFE (MeN) *SWAY(N 
1¢1))—€1e0FSSX(MeN)/SCOX (MeN) ) #MOLP(MSNI-DI¥ROT(MsN) + (PAPP(MsN)—-OL/X 
2C(MyN)) *SWAYON) DAC EAPP OM ND ECXC(MeNISZYCOMSN) #100 )-O1/SXCOMSNDD 

RULP(M eN)=(SSY (MeN) EMOUP (Mo NI-CCY (MeN) *¥MULP (MON) D¥YCOMSNIS( (SSY OMS 
IN) #SSY (MeN)—CCY (M9N)¥CCY (MON) ) FEC (MeN) #LXC(M ON) D 

RDLP (MeN) =XCUMeN) €MULP (MONS (COX OM 9 N) FEC (M9 N) EIXC(MON) —(CCY (MON) & 
LMDLP(MsN)—SSY (Ms N) ¥NULP (MON) 2 ®YC (MONI SOC CCY (M9 N) €CCY (MeNI—-SSY (MON) 
2*SSY (MeN) ) ¥EC (MeN) ®IXC (MSN) I—0SSX OM ONIZSCCX (MON) )#ROTOIM oN) FU CCOXOMS 
3N)4#SSX(MaN))ZOCCX (MON) FXC OMEN) )) #(OELD (MeN I—SWAY (N) 24 (DELO (MeN) —SW 
GAY(N4t1}))7YC(MON) 

KLUP(M »eN)=90-0 
GGaTOo 17 49 

KCLF (MN eN)=9966 99 
RLLP(MsN)=99SG GG 
RLLE (MeN) =959E52SS 
CCNTINUE 

CCNTIRUE 

RETURN 

EAC 

SUAROL TINE CHECK3 
COMMCN/AREAILZS AGC(9504) eo LXG69504) 9 ZXG( Ge 04) oF YG( 9204) sEG(9 204) 0 

CLDES (9 004) eLLCES (9004) 5h G09 004) oW(9 904) eVWA(S 904) 2 VHB (9004) 0 

MEAG (9904) eMF EAI 604) eNECACD 204) oMFCB(D 504) oMAX (9204) oMBY(9004% Do 

VWAL (9904) oVWEL (5 904) sCA1L(9 004) 5CA2(9 204) 0CA3(9 204) sCAS( 9204) 0 

CAG(9 504) eCBI (SG 004) eCH269904) 6CB 369004) oCE5(9s04) sCH6(9204)e 

MBAP (9404) pMAEP (S004) sMCAP (9904) eMCEF(9 504) 2XG(9204)sVE(I0 0400 

VA(9 504) sVEC9 204) oMA(9 204) 0 M315 204) RAGP( 9204) eREAP(9004 Do 

RCAE (GS 604) eDELC (9204) sRBAFL (9904) sRCAPL (9204) sRABPL (G04) 
COMMCN/SARE ALS ACLS 0 C4) o LXC(9 904) op ZXCVG 004) oRXC(G9 004) oWO( 9004 Do 
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FYC(9304) .EC(9 04) 2€C(9 004) 2SS5(9 204) sCOX(5 204) eo SSX(G 204)» 
CCY¥(9504) eSS1¥(S5 504) oCL1 (9204) sCL2(9 04) 2CL 3(9 004) eCL5(9204 Do 

CU1 (05 6904) 6€U2(9 404) +CU2B(G 304) 6CUS(9,04) aM0(9204) eMC(G204) 6 

MULF (9204) »sMLULF(9 204) »sMOLP(9204) sMCUF(92049) XC(G204) 6 YC(FG204)» 
XMP (9,04) oe VL(G94C4) 2VU(9 204) eNL(G 404%) »MU(9 004) »RLLUP( 920%) 6 

FULP (9.04) sROLF (9304) sDELD(9204) 2L(G)+H( 04) »2K(G)»+SUMV(I9) .8(100) 
COMMCR/SAREABZS AE(G 20452) eRXE(920402) sFYB(9 20422) v9EB( D042) 6 

LB(G5 40462) .CO1(G20492) 6CO02( 520422) 2 C03(9204 22) sCD4(S 0422) 6 

CO2 (9204) PCR (510402) FE (920492) sFBUP(94 0402) sFUX(Gr0422) 9X( 10036 
FDES( 04) «-VDES(G 604) »sPDES (9) oF (04) sP (9.04) +PAPP(9 204) 2VINCR(9D 204 Do 
RF (300) eRLL (300) eRP( 300) A( 100245) 2V(45245) »~DETsRINLL eRINF sRINPo 
SWAY (04) «ROT(9304) sDEL (9104 ) 2 COS (920402) 407699049) COL 9204) sRINVe 
RV(300) eVIT(S C4) eVITL (9 904) 2€S(5904) 2C10(9404) 
COMMOCNSAREAGS JC19404)556(9204)5,58B(9 20492) s INDE oMMeNN oMMMINNNe IL oo 
1 NAsNBeNCYC es INOS eLLULEsNbL oe IND2(9) 5 LELASTsNLAST» LAREAs INO»s IREV»s LREV2,e 
2 ISTABSLT1IO+sTI1¢112 +. IGL(GsC4) » ICL (9204) »sJVBL (92,0402) e113 ¢114-115S 
REAL MA sMBsML eMUsl » IXCeo IXGstLLDES el Gels MFBA eMF AL eMFCA oe MFCB oe MAXs 
IMBYeMBAP se MABP »pMCAP»NCBP eMULP eo MLUF »NDLPsMDUP 5K eMCehMD 
REAL*@ COLUMN ,ERACE»sGIRDER,s IDENT1,IDENT2sI1I0ENTI,ICENT4,IDENTS 


Oran = 


a 


CU fF Wh = 


GRACING FORCES 


OC 690 N=1sNAN 

T=1 ‘ 

OC 640 M=2,MM 

IF(IJB(MeN>IT)2ECeS) GO TO 640 

IF ( JB(MsN,I)-ECez2) GU TO E20 
IFCIJB(MsNet)-EQe3) CO TA 630 

DI=AB(MeN,TIXEB(MINAETIISLBIMONOT) 

DZ=K(N)/LAUMsN>1) 

OS=L(M-1)/SLE(MsReT) 

FE( MeN oI) =O014(02* (DEL (MeN )—DEL (M—-1,N41) ) 403 *(SWAY(N)—SWAY(N41))) 

FAX(M»eNsT)=FB(MsN,I)*O3 

FEC BPEVAST.EC.1) €G TO 6410 
THELREVeEO<OPT GE TE 520 

IFC JECMeNe 1) 2EO211) GO TO 640 

IF CFB(MsNs1T)-CE3040) GO TO 610 

IF(FE(M»sNos LT) +PCR(MsN,1)) €053640,640 

JE(MeR, 1) =3 

INO=IAC+#1 ‘ 

WRITE(E4600) MonNol 

GEL TO 640 

IF(CFEC(CMeNesIT)-FEFE(MsNGI)) €4026403E93 

JECMsN51)=2 

INC=IKC+41 

WRITE(6,601) Modal 

GE 7tG €409 

FECMesN»T)I=FRP(MsN,1) 

O3Z=LUM-1)/LB(Y »NoI) 

FEX(M»sNeo IT =FRB(M,N,Z1)¥*OF3 

GC TO 640 

FE(MsNX,1)=—-PCR(MINGT)D 

D3=L(%~-1)/LE(¥ N51) 

FEX(MseNs IT J=FE(M2NSI)*03 

EENT ENUE 

I=2 

OC 68C N=1.,"MM 

IF ( JB(MeNeL) EQS) GO TG 680 

LE GIR CMaNe EkeEOs2c) GO TG E60 

LE CIECM Ns f abGes)) CG Te 1617/0 
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DI=AL(MSNeI)*¥EC(MSNSTI/SLO(MONeT) 
D2=H(h)I/SLB(MsN,1) 
C2=L(M)/LU(MsNoI) 
FE(MesdN eI )=D14(C24(CEL(M,N )—-DEL (M41 eN4+1) )-O3*¥(SWAY(N)—SWAYC(N#1))) 
FEX(Me,NeITI=FE(M.~KLI1)*03 
EECLRELASTREGG 21 J IGG TG 620 
LE CEREV~EQ.0) €G FG S2t 
TEC IJECMsNe Tl) -EGel1) GE TC 680 
Sik TE CFEUMSN, IT) -GCE«020) GC TG 650 
IF CFE(MENeT) FP CR(M.AN~L)) €455.680,;E80 
€45 JE(M,N,I)=3 
INC=INC+1 
WRITE (62600) MoenNol 
GeTtTO, €38i0 
ESO IFC FECMSN»,IL)—-FEP(MesNeI)) €802680,E52 
6é€2 JE(M2NR,1)=2 
INC=INC#I 
WRITE (62601) MoNol 
GC TO 680 
660 FE(MsN +> 1)=FEF(MSIA,T) 
O3=L(M)/SLB(M,N67T)d) 
FOX(MsN eT) =FEC(M,N2T) *03 
G€ Ta 680 
670 FA(M»N»TY=—-FPCR(M,No IT) 
D2=L(M)/SLB(MeNGE)D 
FEX(MsN»,ILI=FE(MeN2L)*O2 
680 CONTINUE 
6s0 CCNTINUE 
TFCINCE -EGQe2) COTO 708 
€CO FCRMATCLHO sS+ERACE »s3I3,11HREACHED PCR) 
601 FORMATC(CLHO,SHERACE s313+,16HYIELD IN TENSION) 
WRITE (65914) 
OC G40 N=1,NNN 
CO 935 M=2.,éMM 
T=1 
FECIECMaNs Li) cl OeS)” GO TE 93S 
WRITE(6,915) MsNeTsFBC MeN, ITI ,JB( Nos No Ll) oF BPC MeNe I) »sPCROIMsNoI) oF UX(M 
oNol) 
G25 CEN TINUE 
DC 939 M=1.MMM 
I=2 
LEC CMs Ly sO eS) CGO .COnS39 
WRITE (65915) MeNoTsFB(MeNoe IT) sJB(MeNoLsFRBPIMINe I) sPCRIMseNeo IT) sFEUX(M 
1lsNoI1) 
GES CENTINCE 
940 CENTAINUE 
708 CCNTINVE 
914 FCRMAT (1HO»sE4HERACE PORIGE HINGE Ree PCR 
1 FX) 
Sis FCRMAT(IH .313sEXsFSe2,1Ga3(S5X0F Be2)) 


~ 


SEEAR “CHECK 


WRITE (€560) 

DC 80 N=2.,NN 

S$e=0.0 

OC €4 M=1,MM 
TFC(NeEGeNN) GC TC 62 
SB=SB+VUCMsN—-1)4+VLOUMeN) 
GO TO 64 
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A-66 


SE=SB4#VULC(M,N-1) 

CONTINUE 

OC 7S M=2,MM 

HECNS EOeNN). GG TC 72 

SB=SB-FEX(MsNo1)4+FBX(MeN—1.1) 

Go Toa 2S 

SG=SBtFBX(MsN—-1.1) 

CCNTINUE 

OC 76 M=1,MMM 

IF(N-e-EQeNN) GO TC 73 

SE=SBAFBX(MeNs2)-FEX(MsN—-1,2) 

GE FTO E 

SB=SB-FRBX(MsN-1,.2) 

CONTINUE 

SE=SH+tF(N) 

WRITE(€6,E66) NoleB 

CONTINUE 

FORMAT (IHOs29RKFLCCR LEVEL SHEAR BALANCE ) 

FCRMATC IH »s16511X5E11 2-4) 

RETURN 

ENO 

SLBROLTINE HREV 

CCMMCRSAREAILZS AC(9404)%s 1XG(9,04)5ZXG(5204) sFYG(9 204) sEGI( 9204) 
OLDES(9 604) sLLDES(9204).LG(9404) »W(9s04).VAA(9 204)» VWI(9204) 

MF AB (S404) sMFBA(9 404) »eMFCA(S 404) sMFCB(9 504) eMAX(9 504) »eMBEY(G204)5 
VWAL (9404) »sVW¥BL (9304) »CA1( 9204) sCA2(G504) 4CA3B( 9404) »CAS(G204) 6 
CA5(G 404) C1169 604) -C82(9,04) sCE3(9204) »CBS(G,04) eCBE(9204)— 
MBAP (9 4.04) »MABP (9404) sMCAP(9204) seMCBF( 9404) 1XG(9204) »pYG(Gr04)8 
VA(9 04) 0VB(G 04) MA(9504) 2NB(5104)sRABP(9,04) sRBAP(G204)e— 

FCAP (9,04) »,DELC(9+04) »sRBAPL (9304) +RCAPL(9 604) s,RABPL(9204) 

COMMCNSAREA2Z]L AC(G304)5TXC(9»04)42XC(9104) »sRXC(G 04) »eWO(9104) 6 
FYC(9 604) -EC(9504) 0CC(9 404) 4S5(9504) sCCX(9304) 3SSXK(Gr04) 5 

CCY¥(G 2.04) »SSY(E.04) »CL1 (9204) sCL2(9 404) .CL3(9,04) ,CLE(9204)> 

CU1 (E04) sCU2 (9504) sCUS(S 104) sCUE(9,04) eMD(9204) o¥C(9504) 

4 MULE (G.,04) eMLLE(G,04) sMOLF (9204) sMOUP(G204) »XC(9,04) 2YC(Gs04)— 

— XMP(G.04)3sVL(9204) sVU(9 504) oe ML(9 604) eMU(9D 204) sFLUP(9.04) « 

6 RULP (9,04) sRCOCLP (9,04) -DELD(9 504 )sL(G)H(04) .K(G),SUMV(9) .8(100) 
COMMCNRSAREASS AE(9 20452) sKXE(G204 02) pFYB (920452) eEB( 920402) 6 

1 £8(920422) 6C€D01(G 10492) »C02(910402) 1C035(G204 52) »CD4(G204.2) 6 

2 €C2(G .04) oPCR(950452)sFB(950452) sFBP(9.C4 52) sFEX(920402) -X(100),. 

Ss FODES(04) »VDES(9,04)s,PDES(9) .F(04),P(9304) sPAPP(9,04),VINCR(9,04), 

4 kF(3C0)sRLL (3200) »RP(300)5A(0100545).V(45 445) sDET sRINLL »sRINF oRINPS 

Ss 

6 


NOWMSOWA = 


WN = 


SWAY (04) »ROT(9 204) sDEL(9404),0C05(950452),0C7(92-04)+C8(9,04) »sRINV, 
RV( 300) eVIT(G 504%) sVITLI9 604) 205 (904) sC10(9,04) 

COMMOCNSAREASS JC(9204)4.45E(9204)55I8(9 10402) eINDGeMMsNNoMMMSNAN OTL 
1 NAsNESNCYCe INDZS sLLL efit sINO2(9) e+ TELASTsNLAST «4 LAREAs INO», IREV» IREV2, 
Pe Loess Lileks Jol CSOs CF NaCl Se 4iie SEL CS O45 2 )in LA Sel b+ ef 1S 

REAL MAsMBoMLeMUsL sIXCesIXGeslLLDESslLGslLlsMEFBA sMFABsMFCA eMFCBeMAXs 
IMEY »eMEAP »MAGP sMCAPSZMCEPs MULP,MLULF »MOLF »MCUP 5K »MC»ND 

REAL¥#& COLUMN, BFACE -GIRCER*+ IDENT1»LOFENT2Z2,IDENT3,1CENT4 »pIDENTS 


GIRDEFS 


IREV=0 

DC 200 N=2eNN 

CC 199 M=1le¥MM 

IF LTIGCM YN) SEQS1) GO TE 199 
IF (JG(M»N)-EQe-1C) GG TC 199 
IF CIG(MIN)-EQe-11) GC TC 199 
LFA. (JG(MeN EC e122) GG TG 199 
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119 
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LELIGEMsND.EO.2) GG TA 115 
LE CIGIMeN) cE O05) GO TE 145 

LE RIG ihieN) 660.6) GE TG 125 

LE CiGtMA NI SEG314) GE TO Lis 

TROIS teen) -LG316) GC TE LTS 
GEsroSr2Zo 

IE CAG(MSN) -ECGo-1-.0) GG TE 120 

IF (FCN) -GE202.0) GC TG 7C 

De Glee Ol) UGC TG la 3 

IF (RAEP (MSN) fF APPL(M¥,K)-LT2O-.0) GE TO 110 
N1=ABS(RABP(MSN)) 

C2=ABS (RABPL(M,N)) 

LaCie GE.D2) CG TE 120 

WRITE(E 599) MeN 

IREV=IREV+41 

GRGIG UMS NDE Oe2) “GE Te ATG 

TECIGUMseN) .60.5) GO TH 1172 

TECIG(IMEN) st Q.6) GG TE 11a 

IFCIG(M2N).EQ214) GC TC 119 

GO TO 120 

JG(Ms)=10 

DI=EG{I MeN) ¥IXGC(MsN)Y/SLG(MSN) 

CA6 (MeN )=MAEP (MeN I-NFAB(MSNI-D1¥( (46043 2.0*WO(MsN)SLGIMON) )*ROT( MEN 
L)+(2e0tZeOFUC(MHELSNISLG(M ON) 2 FRET (M4t15N)—-620*(DEL(M+t15N)—DEL(M,N)) 
2 /LG(M»N)) 

CE6(MeN)=2.0*C14*#RABP(MIN) 

C7(MeN) =MABP(M2N)-O04S*#MBAP(MIN) +065*MFBRA(MIN)—MFAB(MIN) 401 *¥( 3.0 4( 
IOEL(CMF*1lsNI—-DEL (MIN) DALGIMIN)-3eOK(1L20F06.5S*WO(MSN)SLGI(MIN) )*¥ROT(MIN 
2)-1-S*#(HC(M4tELSN)ISLG(MLN)) FROT(MF+14N) ) 

GE TO e120 

JIG(M, )=13 

DI=EG(M3N)¥IXGC(MsN)/SLG(MSN) 

CAGB(MsNI=MABP(MINI—O4S*¥MBAP(M IN) 06S *MFRACMNI—MFAB(MIN) #D1¥(320¥( 
1DEL (M41,N)—DEL (MeN) ISLE (MeN )-3-0¥ (16040 05*WC(MeNI/SLG(MeN) 2) ¥ROT(MON 
2)-1L.eS#¥#(WCOIM4FtLs NISL E(MIN))FROT(M41.N)) 

CE6(MsN)=0.0 

GG how! 20 

JE(MsN)=15 

DI=EG(MsN)¥*¥IXG(MsN)SXGIM oN) 

D2=120/(XG(MsN)*#*FZtYG( NON) 443) 

D3=MABP(MsN)—O0 «o£ *#NCAP(MsN) 40 eS*¥MFCA(MsN)—MFAB(MSNI—-D1*( (32041 2654WC 
V(MseNISXGIMeN) ) tRCTI(MIN)—3-.0*#(DELC(MsN) —-OEL (MSN) )SXG(MeN) ) 

CA6(M »N)=XG(M,N)4¥3402403 

CBE(M sN)=XGOM oN) *¥XG(MeND FYG(MIN) *¥O02*D3 

GG Forrzo 

WRITE (6288) 

FCRMAT(1H »*SECCNO KINGE REVERSAL DETECTED AND WILL BE IGNORED®) 

IREV=1REV—-1 

FE GIGCUMsNeEO~6es) GCG TG eh2s 

LECIGOCMWN) .£0.5) GG TO res 

TECIGCUMSN) .6O.7)- CG TO 125 

LE CIGEMSN ee Osi) GG TG 125 

LECIG (MeN) EO. 12) GE Te t2s 

GC TO 140 

IF CAG CRN) eEGs— 1.0) GO TC) 40 

LECEGON) ol E6020)" Gas OTS 

TE CIC SES TIO} Ge ko Lao 

IF (RAAP (MN) *¥REAFL (M,N) oL T2020) GE TO 130 

CI=ABS(RBAP(M,N)) 

D2=ABS(RAAPL(MeN)) 
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IF(01-GCE-D2) GO TC 140 
WRITE(6293) Moen 

[KE V=IREV+L 

IF (IG(M2N)2EQe3) GO TO 13€ 
IFC IYG(MeN}D 2EQeS) GO TO 137 
IFC IJG(MsN)eEGe7) GO TC 138 
TP CUG(IMeN)Y2EGL13) CO TC 139 
Gc TO 1490 

JG(MsN)=11 

CI=EG (MeN) ¥IXC(MSNISELG(MON) 
CAB(MsN)=2e0*C1*hGAP( MAN) 
CP6( MeN) =MBAP (Me RI—ME CACM eNI—-DL¥( (2004+ Se OF WO(MeN)SLG (MON) ) *ROT (CMON 


1)4(4eCH3ZeORWCO MEL SNISLG( MeN) ) ROTC MEL 9NI—-620%(DEL(M#1SN)—DELCMN))D 
2/7LG(MeN)) 

C7CMeR) =MUAPCMLN )—06S5#MABP (MeN) #06S5*MFAB(MIN)—-MFBA(M ON) 401 *(320¥( 
1DEL (M41 »eN)—DEL (MeN) )/LG (MON) —-3eOF( 16040 0 S*¥WC(MtELONISLG(M9N)) *ROTOM 
StlLeN)—LeS¥C UCC MeN) /SLG(M2N))#ROTO(MSN)) 

Gc TO 1490 

JE(MeN)=14 

DI=EG(M»eN)*ILXG(M»NISLG(MeN) 

CAG(My~N)=020 

CBRO(MsN)=MBAP (MoKA )—0 eo S#VAEP (MAN) +0 0S*®MFAB(MINI-—MFBACMON) 401 *(3.0%( 
IDEL (M41 9N)—DEL(MsN))/LG(MsN)-3e0¥( 10040 eS#WC(MtEL eS NISLGI MeN) 2 *¥ROTOM 
2tleN—LeS#IWCOMsNISLG( MeN) ) FROT (MOND) 

GC 10 140 

JG(MeN)=17 

CI=EG(Ms»eN)I¥ILXC(MsNISYECCMON)D 

D2=1eC/(XG(M»N)*FIt+YG( M,N) ¥*S) 

D3=MBAP(MIN)—O eS *#MCBP(MyN)—MF BAC MON) +006 S*MFCBE(MNI—36O0*DIF( (1 -0t06 
IS*WwC(MFtLeNISYG (MeN) )¥ROT (MELON )I—COELCM4+19NI-DELC(MsN) ISYG(MeN)) 

CAG6( MN) =XG(IM eNIV¥FYG(M IN) FYG(MSN) ¥O24D03 

CBE(MseNI=YG(MsN)*#4*3%02403 

Gc 10 140 

WRITE (6588) 

IREV={RtEV-?2t 

IFC JG(MsN)-EQe-4) GO TG 145 

IF(JIG(MN)2eEQ2*E GO TC 145 

IFC IG(M»*N)-EGe7) GG TO 146 

FECIGOMEN) cEGelS) GE TG Las 

IFC UG(MsN) E017) GO TC 145 

GG, LO 199 

IF OCRCAF (MeN) *®&CAFL (M,N) «LT2O1O)} GC TO 150 

Di=ABS(RCAP(M2N)) 

D2Z=ALS(RCAPL(Ms,N)) 

[RCO GhaDe), GE TEetss 

WRITE(E 97) Mod 

TFC IG(M»eN) eEC 24) JG(MsN)=12 

IFC IG(MsN) eEQeE) JG(M»NI=LE 

TFC IGIMeN).EQ+7) JG(MsN)=18 

CCNTINLE 

CONTINUE 

FORMAT(1IFO.,* HENGE REVERSAL LEFT END GIRDER, *el 

FORMAT(1HOe THINGE REVERSAL RIGHT END GIRDEF,*2 

FORMAT(LIHO,*HINGCE REVERSAL INTERICR GCIRDERs el 


4! 
1s) 
5) 
CIAGCNAL BRACING 

OC 30C A=leNNN 


OC 249 M=25"M 
LE CISC eNa t heb O es) CO ATO U2OS 
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GC TCG 249 

DIZ=AE(MsNol) FEC ( MeN oLI/LBI(MeNo ld 
D2=K(NISLBECM eNO) 

D2=L(N-1L)/SLE CM oh ol) 
D4=014(D2*(OEL(MeN)-DEL (M=1LoNt1))+03*(SWAY(N)-SWAYCN#1))) 
IF (O044PCR(MsNo1)) 249224422190 
WRITE(E 291) Mod 

IREV=IREV?tI 

JE(Me,Ne1)=11 

CCNTINUE 

CC 299 M=1.5.4NM 

IF CJUE(MeNo2) -E003) GGeTe, 25S 

GG TQ 299 

CI=AB(M No 2) FEB (MeNo2 DALE (MoNe 2) 
D2=H(N)/JLBUMeN 22) 

D2=L(M)/SLB(MoNo2) 

D4=01*(D2* (DEL (MyN)—DEL (M4} oNt1) )—-D3#(SWAY(N)—SWAYCN#1))) 
IF (D44PCR(MeN02)) 259+259%260 

WRITE (6292) MeN 

IREV=IREV#tI 

JE(Mshd»,2)=11 

CCNTINUE 

GENTINUE 

FCRMATCLHOs*BRACE ELASTIC's214e* 1°) 
FCRMATCLHOs*ERACE ELASTIC* »214e° 2°) 
RETURN 

END 
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A.5 Accuracy of the Computer Solution 


Each time the simul taneous equations were solved and the 
moments and forces determined, a check was made on the accuracy of the 
results. The horizontal forces in each story were summed, and the. 
resulting errors determined. For the twenty-four story braced frame, 
the maximum error in the shear balance in any story at a load factor 
of 1.30 was 0.16% of the applied horizontal load using single pre- 
cision arithmetic, (6 significant figures), and 0.03% using double 
precision arithmetic, (15 significant figures). These errors are well 
within acceptable tolerances. 

In addition, the deflected shapes of the structures were 
examined at various stages in their respective loading histories, to 
check the "reasonableness" of the solution. In all cases individual 
displacement quantities increased in a regular fashion, and agreed 


with known structural behavior. 
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